home *** CD-ROM | disk | FTP | other *** search
/ Acorn RISC PD-CD 1 / Acorn RISC PD-CD 1.iso / utilities / _graphics / graphics / _appdock2 / _runimage < prev    next >
Unknown  |  1993-07-28  |  40.4 KB

open in: MacOS 8.1     |     Win98     |     DOS

view JSON data     |     view as text

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% xdgMime image/x-tga default



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 38 f4 20 3e 20 | 73 63 73 69 3a 3a 53 43 |...8. > |scsi::SC|
|00000010| 53 49 44 69 73 63 2e 24 | 2e 44 65 76 65 6c 6f 70 |SIDisc.$|.Develop|
|00000020| 2e 44 6f 63 6b 2e 21 41 | 70 70 44 6f 63 6b 2e 21 |.Dock.!A|ppDock.!|
|00000030| 52 75 6e 49 6d 61 67 65 | 0d 00 14 04 0d 00 1e 05 |RunImage|........|
|00000040| f4 0d 00 28 45 f4 20 20 | 54 68 69 73 20 61 70 70 |...(E. |This app|
|00000050| 6c 69 63 61 74 69 6f 6e | 20 69 73 20 46 52 45 45 |lication| is FREE|
|00000060| 57 41 52 45 2c 20 69 2e | 65 2e 20 79 6f 75 20 6d |WARE, i.|e. you m|
|00000070| 61 79 20 63 6f 70 79 20 | 61 6e 64 20 64 69 73 74 |ay copy |and dist|
|00000080| 72 69 62 75 74 65 0d 00 | 32 44 f4 20 20 69 74 20 |ribute..|2D. it |
|00000090| 61 73 20 6c 6f 6e 67 20 | 61 73 20 61 6c 6c 20 66 |as long |as all f|
|000000a0| 69 6c 65 73 20 61 72 65 | 20 73 75 70 70 6c 69 65 |iles are| supplie|
|000000b0| 64 20 61 6e 64 20 6e 6f | 74 68 69 6e 67 20 69 73 |d and no|thing is|
|000000c0| 20 6d 6f 64 69 66 69 65 | 64 2e 0d 00 3c 05 f4 0d | modifie|d...<...|
|000000d0| 00 46 1d f4 20 20 a9 20 | 31 39 39 32 20 4d 61 72 |.F.. . |1992 Mar|
|000000e0| 74 69 6e 20 57 fc 72 74 | 68 6e 65 72 0d 00 50 1c |tin W.rt|hner..P.|
|000000f0| f4 20 20 20 20 20 20 20 | 20 20 4a 61 68 6e 73 74 |. | Jahnst|
|00000100| 72 61 73 73 65 20 31 38 | 0d 00 5a 20 f4 20 20 20 |rasse 18|..Z . |
|00000110| 20 20 20 20 20 20 57 2d | 37 30 33 34 20 47 61 65 | W-|7034 Gae|
|00000120| 72 74 72 69 6e 67 65 6e | 0d 00 64 15 f4 20 20 20 |rtringen|..d.. |
|00000130| 20 20 20 20 20 20 47 65 | 72 6d 61 6e 79 0d 00 6e | Ge|rmany..n|
|00000140| 05 f4 0d 00 78 04 0d 00 | 82 47 69 64 74 6c 65 6e |....x...|.Gidtlen|
|00000150| 25 3d 31 30 30 30 3a 69 | 64 62 6c 65 6e 25 3d 32 |%=1000:i|dblen%=2|
|00000160| 35 36 3a 77 69 6e 64 6f | 77 6c 65 6e 25 3d 32 30 |56:windo|wlen%=20|
|00000170| 30 30 3a 64 74 6c 65 6e | 25 3d 32 34 2a 33 30 3a |00:dtlen|%=24*30:|
|00000180| 73 63 74 6c 65 6e 25 3d | 31 36 2a 33 30 0d 00 8c |sctlen%=|16*30...|
|00000190| 21 de 20 49 44 54 25 20 | 69 64 74 6c 65 6e 25 3a |!. IDT% |idtlen%:|
|000001a0| de 20 49 44 42 25 20 69 | 64 62 6c 65 6e 25 0d 00 |. IDB% i|dblen%..|
|000001b0| 96 36 de 20 42 55 46 46 | 45 52 25 20 33 30 30 2c |.6. BUFF|ER% 300,|
|000001c0| 64 6f 63 6b 74 25 20 64 | 74 6c 65 6e 25 2c 73 63 |dockt% d|tlen%,sc|
|000001d0| 74 25 20 73 63 74 6c 65 | 6e 25 3a de 20 73 63 76 |t% sctle|n%:. scv|
|000001e0| 25 20 32 30 0d 00 a0 3b | 6d 65 6e 75 6c 65 6e 25 |% 20...;|menulen%|
|000001f0| 3d 31 30 30 30 3a de 20 | 4d 45 4e 55 25 20 6d 65 |=1000:. |MENU% me|
|00000200| 6e 75 6c 65 6e 25 2c 51 | 25 20 34 38 2c 57 49 4e |nulen%,Q|% 48,WIN|
|00000210| 44 4f 57 25 20 77 69 6e | 64 6f 77 6c 65 6e 25 0d |DOW% win|dowlen%.|
|00000220| 00 aa 12 54 41 53 4b 3d | 26 34 42 35 33 34 31 35 |...TASK=|&4B53415|
|00000230| 34 0d 00 b4 04 0d 00 be | 43 c8 99 20 22 57 69 6d |4.......|C.. "Wim|
|00000240| 70 5f 49 6e 69 74 69 61 | 6c 69 73 65 22 2c 32 30 |p_Initia|lise",20|
|00000250| 30 2c 54 41 53 4b 2c 22 | 41 70 70 6c 69 63 61 74 |0,TASK,"|Applicat|
|00000260| 69 6f 6e 20 44 6f 63 6b | 22 20 b8 20 4f 53 5f 56 |ion Dock|" . OS_V|
|00000270| 2c 74 61 73 6b 5f 68 25 | 0d 00 c8 1b ee 20 85 20 |,task_h%|..... . |
|00000280| f2 65 72 72 6f 72 62 6f | 78 3a f2 66 69 6e 69 73 |.errorbo|x:.finis|
|00000290| 68 3a e0 0d 00 d2 28 c8 | 99 20 22 4f 53 5f 52 65 |h:....(.|. "OS_Re|
|000002a0| 61 64 4d 6f 6e 6f 74 6f | 6e 69 63 54 69 6d 65 22 |adMonoto|nicTime"|
|000002b0| 20 b8 20 6f 6c 64 74 69 | 6d 65 25 0d 00 dc 04 0d | . oldti|me%.....|
|000002c0| 00 e6 1d 53 3d 8e 28 22 | 3c 44 6f 63 6b 24 44 69 |...S=.("|<Dock$Di|
|000002d0| 72 3e 2e 53 70 72 69 74 | 65 73 22 29 0d 00 f0 28 |r>.Sprit|es")...(|
|000002e0| e7 20 53 3d 30 20 8c 20 | 85 20 31 2c 22 43 61 6e |. S=0 . |. 1,"Can|
|000002f0| 27 74 20 72 65 61 64 20 | 73 70 72 69 74 65 20 66 |'t read |sprite f|
|00000300| 69 6c 65 22 0d 00 fa 0c | 45 58 53 25 3d a2 23 53 |ile"....|EXS%=.#S|
|00000310| 0d 01 04 1a de 20 53 70 | 72 69 74 65 73 25 20 45 |..... Sp|rites% E|
|00000320| 58 53 25 2b 34 30 3a d9 | 23 53 0d 01 0e 3f 21 53 |XS%+40:.|#S...?!S|
|00000330| 70 72 69 74 65 73 25 3d | 45 58 53 25 2b 34 30 3a |prites%=|EXS%+40:|
|00000340| 53 70 72 69 74 65 73 25 | 21 34 3d 30 3a 53 70 72 |Sprites%|!4=0:Spr|
|00000350| 69 74 65 73 25 21 38 3d | 31 36 3a 53 70 72 69 74 |ites%!8=|16:Sprit|
|00000360| 65 73 25 21 31 32 3d 31 | 36 0d 01 18 36 c8 99 20 |es%!12=1|6...6.. |
|00000370| 22 4f 53 5f 53 70 72 69 | 74 65 4f 70 22 2c 35 32 |"OS_Spri|teOp",52|
|00000380| 32 2c 53 70 72 69 74 65 | 73 25 2c 22 3c 44 6f 63 |2,Sprite|s%,"<Doc|
|00000390| 6b 24 44 69 72 3e 2e 53 | 70 72 69 74 65 73 22 0d |k$Dir>.S|prites".|
|000003a0| 01 22 1b 4d 41 58 3d 31 | 30 30 3a 53 53 25 3d 31 |.".MAX=1|00:SS%=1|
|000003b0| 33 36 3a 53 42 25 3d 31 | 33 32 0d 01 2c 3e de 20 |36:SB%=1|32..,>. |
|000003c0| 50 24 28 4d 41 58 29 2c | 4b 4e 28 4d 41 58 29 2c |P$(MAX),|KN(MAX),|
|000003d0| 43 54 28 4d 41 58 29 2c | 4b 45 59 43 25 28 4d 41 |CT(MAX),|KEYC%(MA|
|000003e0| 58 29 2c 4b 46 4c 41 47 | 28 4d 41 58 29 2c 43 4f |X),KFLAG|(MAX),CO|
|000003f0| 44 45 53 25 28 32 30 29 | 0d 01 36 20 4d 41 58 41 |DES%(20)|..6 MAXA|
|00000400| 50 50 53 3d 32 30 3a 44 | 53 43 4d 41 58 3d 33 32 |PPS=20:D|SCMAX=32|
|00000410| 3a 53 43 4c 25 3d 31 35 | 0d 01 40 15 41 4e 5a 50 |:SCL%=15|..@.ANZP|
|00000420| 53 25 3d 32 35 35 20 81 | 20 53 43 4c 25 0d 01 4a |S%=255 .| SCL%..J|
|00000430| 1b 53 41 4e 25 3d 2d a8 | 28 2d 44 53 43 4d 41 58 |.SAN%=-.|(-DSCMAX|
|00000440| 2f 41 4e 5a 50 53 25 29 | 0d 01 54 17 de 20 53 44 |/ANZPS%)|..T.. SD|
|00000450| 24 28 4d 41 58 41 50 50 | 53 2c 53 41 4e 25 29 0d |$(MAXAPP|S,SAN%).|
|00000460| 01 5e 39 de 20 41 50 50 | 24 28 4d 41 58 41 50 50 |.^9. APP|$(MAXAPP|
|00000470| 53 29 2c 53 43 4b 45 59 | 43 25 28 4d 41 58 41 50 |S),SCKEY|C%(MAXAP|
|00000480| 50 53 2c 44 53 43 4d 41 | 58 29 2c 53 43 4f 4e 28 |PS,DSCMA|X),SCON(|
|00000490| 4d 41 58 41 50 50 53 29 | 0d 01 68 15 e3 20 4e 3d |MAXAPPS)|..h.. N=|
|000004a0| 30 20 b8 20 4d 41 58 41 | 50 50 53 2d 31 0d 01 72 |0 . MAXA|PPS-1..r|
|000004b0| 13 20 e3 20 4d 3d 30 20 | b8 20 53 41 4e 25 2d 31 |. . M=0 |. SAN%-1|
|000004c0| 0d 01 7c 2c 20 20 53 44 | 24 28 4e 2c 4d 29 3d c4 |..|, SD|$(N,M)=.|
|000004d0| 32 35 36 20 81 20 53 43 | 4c 25 2c bd 31 33 2b c4 |256 . SC|L%,.13+.|
|000004e0| 53 43 4c 25 2d 31 2c 22 | 20 22 29 29 0d 01 86 08 |SCL%-1,"| "))....|
|000004f0| 20 ed 20 4d 0d 01 90 07 | ed 20 4e 0d 01 9a 22 41 | . M....|. N..."A|
|00000500| 50 50 4e 55 4d 3d 30 3a | 53 43 4b 45 59 43 25 28 |PPNUM=0:|SCKEYC%(|
|00000510| 29 3d 2d 31 3a 53 43 4f | 4e 28 29 3d 30 0d 01 a4 |)=-1:SCO|N()=0...|
|00000520| 35 44 4f 4e 3d 30 3a 44 | 4f 46 3d 30 3a 53 43 4f |5DON=0:D|OF=0:SCO|
|00000530| 46 3d 30 3a 4e 4f 53 43 | 3d 37 3a 64 6f 63 6b 5f |F=0:NOSC|=7:dock_|
|00000540| 68 25 3d 2d 31 3a 64 65 | 66 63 75 74 5f 68 25 3d |h%=-1:de|fcut_h%=|
|00000550| 2d 31 0d 01 ae 29 52 45 | 4f 50 45 4e 3d a3 3a 44 |-1...)RE|OPEN=.:D|
|00000560| 50 4f 53 3d 31 3a 53 43 | 50 4f 53 3d 30 3a 53 43 |POS=1:SC|POS=0:SC|
|00000570| 3d b9 3a 45 44 46 4c 41 | 47 3d a3 0d 01 b8 15 4e |=.:EDFLA|G=.....N|
|00000580| 4d 24 3d 22 28 6e 6f 6e | 65 29 22 3a 41 46 3d a3 |M$="(non|e)":AF=.|
|00000590| 0d 01 c2 04 0d 01 cc 0a | f2 63 6f 64 65 73 0d 01 |........|.codes..|
|000005a0| d6 19 f2 72 65 61 64 5f | 64 6f 63 6b 3a f2 62 6f |...read_|dock:.bo|
|000005b0| 6f 74 5f 64 6f 63 6b 0d | 01 e0 0c f2 72 65 61 64 |ot_dock.|....read|
|000005c0| 5f 73 63 0d 01 ea 1b ee | 20 85 20 f2 65 72 72 6f |_sc.....| . .erro|
|000005d0| 72 62 6f 78 3a f2 66 69 | 6e 69 73 68 3a e0 0d 01 |rbox:.fi|nish:...|
|000005e0| f4 29 f2 62 75 66 66 65 | 72 73 3a f2 69 6e 64 69 |.).buffe|rs:.indi|
|000005f0| 72 65 63 74 65 64 5f 74 | 65 78 74 3a f2 69 6e 66 |rected_t|ext:.inf|
|00000600| 6f 77 69 6e 64 6f 77 0d | 01 fe 36 f2 75 70 77 69 |owindow.|..6.upwi|
|00000610| 6e 64 6f 77 3a f2 64 6f | 77 6e 77 69 6e 64 6f 77 |ndow:.do|wnwindow|
|00000620| 3a f2 73 63 6c 65 66 74 | 77 69 6e 64 6f 77 3a f2 |:.scleft|window:.|
|00000630| 73 63 72 69 67 68 74 77 | 69 6e 64 6f 77 0d 02 08 |scrightw|indow...|
|00000640| 1e f2 73 68 6f 72 74 77 | 69 6e 64 6f 77 3a f2 64 |..shortw|indow:.d|
|00000650| 65 66 61 70 70 77 69 6e | 64 6f 77 0d 02 12 1b f2 |efappwin|dow.....|
|00000660| 65 64 69 74 77 69 6e 64 | 6f 77 3a f2 65 64 73 63 |editwind|ow:.edsc|
|00000670| 77 69 6e 64 6f 77 0d 02 | 1c 10 f2 72 65 61 64 76 |window..|...readv|
|00000680| 64 75 69 6e 66 6f 0d 02 | 26 30 f2 69 6e 69 74 69 |duinfo..|&0.initi|
|00000690| 61 6c 69 73 65 5f 6d 65 | 6e 75 5f 74 72 65 65 3a |alise_me|nu_tree:|
|000006a0| 4d 45 4e 55 32 25 3d 4d | 41 49 4e 50 4f 49 4e 54 |MENU2%=M|AINPOINT|
|000006b0| 45 52 25 28 32 29 0d 02 | 30 14 f2 64 5f 74 69 63 |ER%(2)..|0..d_tic|
|000006c0| 6b 3a f2 73 63 5f 74 69 | 63 6b 0d 02 3a 04 0d 02 |k:.sc_ti|ck..:...|
|000006d0| 44 31 f4 20 56 65 72 73 | 69 6f 6e 24 3d 22 32 2e |D1. Vers|ion$="2.|
|000006e0| 33 32 22 3a 44 61 74 65 | 24 3d 22 32 38 2d 4a 75 |32":Date|$="28-Ju|
|000006f0| 6c 2d 39 33 22 20 73 65 | 65 20 62 65 6c 6f 77 0d |l-93" se|e below.|
|00000700| 02 4e 14 46 69 6c 65 76 | 65 72 73 69 6f 6e 24 3d |.N.Filev|ersion$=|
|00000710| 22 30 22 0d 02 58 2a 4d | 41 53 4b 30 25 3d 31 2b |"0"..X*M|ASK0%=1+|
|00000720| 28 31 3c 3c 34 29 2b 28 | 31 3c 3c 35 29 2b 28 31 |(1<<4)+(|1<<5)+(1|
|00000730| 3c 3c 31 31 29 2b 28 31 | 3c 3c 31 32 29 0d 02 62 |<<11)+(1|<<12)..b|
|00000740| 19 4d 41 53 4b 31 25 3d | 4d 41 53 4b 30 25 20 80 |.MASK1%=|MASK0% .|
|00000750| 20 28 ac 20 31 29 0d 02 | 6c 04 0d 02 76 10 4d 41 | (. 1)..|l...v.MA|
|00000760| 53 4b 25 3d 4d 41 53 4b | 30 25 0d 02 80 1f e7 20 |SK%=MASK|0%..... |
|00000770| 53 43 20 8c 20 4d 41 53 | 4b 25 3d 4d 41 53 4b 31 |SC . MAS|K%=MASK1|
|00000780| 25 3a 4f 4c 48 25 3d 2d | 33 0d 02 8a 04 0d 02 94 |%:OLH%=-|3.......|
|00000790| 1b f2 6f 70 65 6e 5f 61 | 6c 6c 28 2d 32 29 3a f2 |..open_a|ll(-2):.|
|000007a0| 63 6c 65 61 72 5f 73 63 | 0d 02 9e 04 0d 02 a8 05 |clear_sc|........|
|000007b0| f5 0d 02 b2 0b 20 e7 20 | 53 43 20 8c 0d 02 bc 12 |..... . |SC .....|
|000007c0| 20 20 4d 41 53 4b 25 3d | 4d 41 53 4b 31 25 0d 02 | MASK%=|MASK1%..|
|000007d0| c6 06 20 cc 0d 02 d0 1f | 20 20 e7 20 ac 20 52 45 |.. .....| . . RE|
|000007e0| 4f 50 45 4e 20 8c 20 4d | 41 53 4b 25 3d 4d 41 53 |OPEN . M|ASK%=MAS|
|000007f0| 4b 30 25 0d 02 da 06 20 | cd 0d 02 e4 29 20 c8 99 |K0%.... |....) ..|
|00000800| 20 22 4f 53 5f 52 65 61 | 64 4d 6f 6e 6f 74 6f 6e | "OS_Rea|dMonoton|
|00000810| 69 63 54 69 6d 65 22 20 | b8 20 6e 65 77 74 69 6d |icTime" |. newtim|
|00000820| 65 25 0d 02 ee 1d 20 c8 | 95 20 28 6e 65 77 74 69 |e%.... .|. (newti|
|00000830| 6d 65 25 2d 6f 6c 64 74 | 69 6d 65 25 29 3e 30 0d |me%-oldt|ime%)>0.|
|00000840| 02 f8 1a 20 20 6f 6c 64 | 74 69 6d 65 25 3d 6f 6c |... old|time%=ol|
|00000850| 64 74 69 6d 65 25 2b 35 | 30 0d 03 02 06 20 ce 0d |dtime%+5|0.... ..|
|00000860| 03 0c 38 20 c8 99 20 22 | 57 69 6d 70 5f 50 6f 6c |..8 .. "|Wimp_Pol|
|00000870| 6c 49 64 6c 65 22 2c 4d | 41 53 4b 25 2c 42 55 46 |lIdle",M|ASK%,BUF|
|00000880| 46 45 52 25 2c 6f 6c 64 | 74 69 6d 65 25 20 b8 20 |FER%,old|time% . |
|00000890| 52 45 41 53 4f 4e 25 0d | 03 16 11 20 c8 8e 20 52 |REASON%.|... .. R|
|000008a0| 45 41 53 4f 4e 25 20 ca | 0d 03 20 0a 20 20 c9 20 |EASON% .|.. . . |
|000008b0| 30 3a 0d 03 2a 11 20 20 | 20 e7 20 52 45 4f 50 45 |0:..*. | . REOPE|
|000008c0| 4e 20 8c 0d 03 34 16 20 | 20 20 20 20 f2 6f 70 65 |N ...4. | .ope|
|000008d0| 6e 5f 61 6c 6c 28 2d 32 | 29 0d 03 3e 11 20 20 20 |n_all(-2|)..>. |
|000008e0| 20 20 52 45 4f 50 45 4e | 3d a3 0d 03 48 1e 20 20 | REOPEN|=...H. |
|000008f0| 20 20 20 e7 20 ac 20 53 | 43 20 8c 20 4d 41 53 4b | . . S|C . MASK|
|00000900| 25 3d 4d 41 53 4b 30 25 | 0d 03 52 09 20 20 20 20 |%=MASK0%|..R. |
|00000910| cd 0d 03 5c 08 20 20 20 | cd 0d 03 66 18 20 20 20 |...\. |...f. |
|00000920| e7 20 53 43 20 80 20 ac | 20 45 44 46 4c 41 47 20 |. SC . .| EDFLAG |
|00000930| 8c 0d 03 70 2b 20 20 20 | 20 c8 99 20 22 57 69 6d |...p+ | .. "Wim|
|00000940| 70 5f 47 65 74 43 61 72 | 65 74 50 6f 73 69 74 69 |p_GetCar|etPositi|
|00000950| 6f 6e 22 2c 2c 42 55 46 | 46 45 52 25 0d 03 7a 2d |on",,BUF|FER%..z-|
|00000960| 20 20 20 20 43 41 25 3d | 21 42 55 46 46 45 52 25 | CA%=|!BUFFER%|
|00000970| 3a 42 55 46 46 45 52 25 | 21 31 32 3d 30 3a 21 42 |:BUFFER%|!12=0:!B|
|00000980| 55 46 46 45 52 25 3d 32 | 30 0d 03 84 12 20 20 20 |UFFER%=2|0.... |
|00000990| 20 e7 20 43 41 25 3d 2d | 31 20 8c 0d 03 8e 15 20 | . CA%=-|1 ..... |
|000009a0| 20 20 20 20 e7 20 4f 4c | 48 25 3c 3e 2d 31 20 8c | . OL|H%<>-1 .|
|000009b0| 0d 03 98 2d 20 20 20 20 | 20 20 4e 4d 24 3d 22 28 |...- | NM$="(|
|000009c0| 6e 6f 20 69 6e 70 75 74 | 20 66 6f 63 75 73 29 22 |no input| focus)"|
|000009d0| 3a 4f 4c 48 25 3d 2d 31 | 3a 41 46 3d a3 0d 03 a2 |:OLH%=-1|:AF=....|
|000009e0| 3b 20 20 20 20 20 20 24 | 64 65 66 61 70 70 69 30 |; $|defappi0|
|000009f0| 3d 4e 4d 24 3a f2 72 65 | 64 72 61 77 5f 69 63 6f |=NM$:.re|draw_ico|
|00000a00| 6e 28 64 65 66 61 70 70 | 5f 68 25 2c 30 29 3a f2 |n(defapp|_h%,0):.|
|00000a10| 63 6c 65 61 72 5f 73 63 | 0d 03 ac 0a 20 20 20 20 |clear_sc|.... |
|00000a20| 20 cd 0d 03 b6 09 20 20 | 20 20 cc 0d 03 c0 35 20 | ..... | ....5 |
|00000a30| 20 20 20 20 c8 99 20 22 | 57 69 6d 70 5f 53 65 6e | .. "|Wimp_Sen|
|00000a40| 64 4d 65 73 73 61 67 65 | 22 2c 31 39 2c 42 55 46 |dMessage|",19,BUF|
|00000a50| 46 45 52 25 2c 43 41 25 | 20 b8 20 2c 2c 52 32 25 |FER%,CA%| . ,,R2%|
|00000a60| 0d 03 ca 16 20 20 20 20 | 20 e7 20 52 32 25 3c 3e |.... | . R2%<>|
|00000a70| 4f 4c 48 25 20 8c 0d 03 | d4 43 20 20 20 20 20 20 |OLH% ...|.C |
|00000a80| 42 55 46 46 45 52 25 21 | 32 30 3d 52 32 25 3a 42 |BUFFER%!|20=R2%:B|
|00000a90| 55 46 46 45 52 25 21 31 | 32 3d 30 3a 42 55 46 46 |UFFER%!1|2=0:BUFF|
|00000aa0| 45 52 25 21 31 36 3d 26 | 34 30 30 43 36 3a 21 42 |ER%!16=&|400C6:!B|
|00000ab0| 55 46 46 45 52 25 3d 32 | 34 0d 03 de 35 20 20 20 |UFFER%=2|4...5 |
|00000ac0| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 53 65 6e 64 | .. "W|imp_Send|
|00000ad0| 4d 65 73 73 61 67 65 22 | 2c 31 37 2c 42 55 46 46 |Message"|,17,BUFF|
|00000ae0| 45 52 25 2c 30 3a 4f 4c | 48 25 3d 52 32 25 0d 03 |ER%,0:OL|H%=R2%..|
|00000af0| e8 0a 20 20 20 20 20 cd | 0d 03 f2 09 20 20 20 20 |.. .|.... |
|00000b00| cd 0d 03 fc 08 20 20 20 | cd 0d 04 06 12 20 20 c9 |..... |..... .|
|00000b10| 20 32 3a f2 73 79 73 6f | 70 65 6e 0d 04 10 28 20 | 2:.syso|pen...( |
|00000b20| 20 c9 20 33 3a c8 99 20 | 22 57 69 6d 70 5f 43 6c | . 3:.. |"Wimp_Cl|
|00000b30| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 42 55 46 46 |oseWindo|w",,BUFF|
|00000b40| 45 52 25 0d 04 1a 16 20 | 20 c9 20 36 3a f2 63 68 |ER%.... | . 6:.ch|
|00000b50| 65 63 6b 5f 6d 6f 75 73 | 65 0d 04 24 18 20 20 c9 |eck_mous|e..$. .|
|00000b60| 20 37 3a f2 75 73 65 72 | 5f 64 72 61 67 5f 62 6f | 7:.user|_drag_bo|
|00000b70| 78 0d 04 2e 16 20 20 c9 | 20 38 3a f2 6b 65 79 5f |x.... .| 8:.key_|
|00000b80| 70 72 65 73 73 65 64 0d | 04 38 23 20 20 c9 20 39 |pressed.|.8# . 9|
|00000b90| 3a f2 67 65 74 5f 70 6f | 69 6e 74 65 72 3a f2 6d |:.get_po|inter:.m|
|00000ba0| 65 6e 75 5f 73 65 6c 65 | 63 74 0d 04 42 16 20 20 |enu_sele|ct..B. |
|00000bb0| c9 20 31 37 2c 31 38 3a | f2 72 65 63 65 69 76 65 |. 17,18:|.receive|
|00000bc0| 0d 04 4c 06 20 cb 0d 04 | 56 07 fd 20 a3 0d 04 60 |..L. ...|V.. ...`|
|00000bd0| 04 0d 04 6a 0e dd 20 f2 | 73 79 73 6f 70 65 6e 0d |...j.. .|sysopen.|
|00000be0| 04 74 0f 20 e7 20 52 45 | 4f 50 45 4e 20 8c 0d 04 |.t. . RE|OPEN ...|
|00000bf0| 7e 41 20 20 e7 20 21 42 | 55 46 46 45 52 25 3c 3e |~A . !B|UFFER%<>|
|00000c00| 75 70 5f 68 25 20 80 20 | 21 42 55 46 46 45 52 25 |up_h% . |!BUFFER%|
|00000c10| 3c 3e 64 6f 77 6e 5f 68 | 25 20 80 20 21 42 55 46 |<>down_h|% . !BUF|
|00000c20| 46 45 52 25 3c 3e 64 6f | 63 6b 5f 68 25 20 8c 0d |FER%<>do|ck_h% ..|
|00000c30| 04 88 24 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 4f |..$ ..| "Wimp_O|
|00000c40| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 42 55 46 46 |penWindo|w",,BUFF|
|00000c50| 45 52 25 0d 04 92 07 20 | 20 cd 0d 04 9c 06 20 cc |ER%.... | ..... .|
|00000c60| 0d 04 a6 23 20 20 c8 99 | 20 22 57 69 6d 70 5f 4f |...# ..| "Wimp_O|
|00000c70| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 42 55 46 46 |penWindo|w",,BUFF|
|00000c80| 45 52 25 0d 04 b0 06 20 | cd 0d 04 ba 05 e1 0d 04 |ER%.... |........|
|00000c90| c4 04 0d 04 ce 19 dd 20 | f2 73 74 61 72 74 28 46 |....... |.start(F|
|00000ca0| 45 4c 44 25 2c 4f 50 46 | 4c 25 29 0d 04 d8 12 20 |ELD%,OPF|L%).... |
|00000cb0| 46 46 24 3d 50 24 28 46 | 45 4c 44 25 29 0d 04 e2 |FF$=P$(F|ELD%)...|
|00000cc0| 1e 20 e7 20 46 45 4c 44 | 25 3e 3d 44 4f 4e 20 84 |. . FELD|%>=DON .|
|00000cd0| 20 46 46 24 3d 22 22 20 | 8c 20 e1 0d 04 ec 23 20 | FF$="" |. ....# |
|00000ce0| c8 99 20 22 4f 53 5f 42 | 79 74 65 22 2c 31 32 31 |.. "OS_B|yte",121|
|00000cf0| 2c 30 20 82 20 31 32 38 | 20 b8 20 2c 46 4c 0d 04 |,0 . 128| . ,FL..|
|00000d00| f6 2e 20 e7 20 28 46 4c | 3d 30 20 84 20 4f 50 46 |.. . (FL|=0 . OPF|
|00000d10| 4c 25 3d a3 29 20 80 20 | c0 a4 6c 65 61 66 28 46 |L%=.) . |..leaf(F|
|00000d20| 46 24 29 2c 31 29 3d 22 | 21 22 20 8c 0d 05 00 30 |F$),1)="|!" ....0|
|00000d30| 20 20 c8 99 20 22 58 57 | 69 6d 70 5f 53 74 61 72 | .. "XW|imp_Star|
|00000d40| 74 54 61 73 6b 22 2c 22 | 52 75 6e 20 22 2b 46 46 |tTask","|Run "+FF|
|00000d50| 24 2b 22 2e 21 52 75 6e | 22 2b bd 30 0d 05 0a 06 |$+".!Run|"+.0....|
|00000d60| 20 cc 0d 05 14 1d 20 20 | ff 28 22 46 69 6c 65 72 | ..... |.("Filer|
|00000d70| 5f 4f 70 65 6e 44 69 72 | 20 22 2b 46 46 24 29 0d |_OpenDir| "+FF$).|
|00000d80| 05 1e 06 20 cd 0d 05 28 | 05 e1 0d 05 32 04 0d 05 |... ...(|....2...|
|00000d90| 3c 10 dd 20 f2 72 65 61 | 64 5f 64 6f 63 6b 0d 05 |<.. .rea|d_dock..|
|00000da0| 46 07 ea 20 85 0d 05 50 | 5b ee 20 85 20 ea 3a d9 |F.. ...P|[. . .:.|
|00000db0| 23 53 3a f2 65 72 72 65 | 70 6f 72 74 28 22 49 6e |#S:.erre|port("In|
|00000dc0| 76 61 6c 69 64 20 64 6f | 63 6b 20 66 69 6c 65 20 |valid do|ck file |
|00000dd0| 28 22 2b f6 24 2b 22 2c | 20 65 72 72 6f 72 20 63 |("+.$+",| error c|
|00000de0| 6f 64 65 20 22 2b c3 9e | 29 3a 44 4f 4e 3d 30 3a |ode "+..|):DON=0:|
|00000df0| 44 4f 46 3d 30 3a 41 50 | 50 4e 55 4d 3d 30 3a e1 |DOF=0:AP|PNUM=0:.|
|00000e00| 0d 05 5a 1c 20 53 3d 8e | 28 22 3c 44 6f 63 6b 24 |..Z. S=.|("<Dock$|
|00000e10| 44 69 72 3e 2e 21 44 6f | 63 6b 22 29 0d 05 64 1a |Dir>.!Do|ck")..d.|
|00000e20| 20 e7 20 53 3d 30 20 8c | 20 44 4f 4e 3d 30 3a 44 | . S=0 .| DON=0:D|
|00000e30| 4f 46 3d 30 3a e1 0d 05 | 6e 0b 20 42 31 3d 9a 23 |OF=0:...|n. B1=.#|
|00000e40| 53 0d 05 78 10 20 e7 20 | 42 31 3d 97 22 56 22 20 |S..x. . |B1=."V" |
|00000e50| 8c 0d 05 82 12 20 20 f4 | 20 6e 65 77 20 66 6f 72 |..... .| new for|
|00000e60| 6d 61 74 0d 05 8c 21 20 | 20 42 32 3d 9a 23 53 3a |mat...! | B2=.#S:|
|00000e70| 42 33 3d 9a 23 53 3a 42 | 34 3d 9a 23 53 3a 42 35 |B3=.#S:B|4=.#S:B5|
|00000e80| 3d 9a 23 53 0d 05 96 14 | 20 20 56 24 3d bd 42 32 |=.#S....| V$=.B2|
|00000e90| 2b bd 42 33 2b bd 42 34 | 0d 05 a0 15 20 20 44 4f |+.B3+.B4|.... DO|
|00000ea0| 4e 3d a4 67 65 74 5f 6e | 75 6d 28 53 29 0d 05 aa |N=.get_n|um(S)...|
|00000eb0| 0f 20 20 e7 20 44 4f 4e | 3e 30 20 8c 0d 05 b4 14 |. . DON|>0 .....|
|00000ec0| 20 20 20 e3 20 4e 3d 30 | 20 b8 20 44 4f 4e 2d 31 | . N=0| . DON-1|
|00000ed0| 0d 05 be 1a 20 20 20 20 | 50 24 28 4e 29 3d a4 67 |.... |P$(N)=.g|
|00000ee0| 65 74 5f 6c 69 6e 65 28 | 53 29 0d 05 c8 40 20 20 |et_line(|S)...@ |
|00000ef0| 20 20 4b 46 4c 41 47 28 | 4e 29 3d a4 67 65 74 5f | KFLAG(|N)=.get_|
|00000f00| 6e 75 6d 28 53 29 3a 4b | 4e 28 4e 29 3d a4 67 65 |num(S):K|N(N)=.ge|
|00000f10| 74 5f 6e 75 6d 28 53 29 | 3a 43 54 28 4e 29 3d a4 |t_num(S)|:CT(N)=.|
|00000f20| 67 65 74 5f 6e 75 6d 28 | 53 29 0d 05 d2 37 20 20 |get_num(|S)...7 |
|00000f30| 20 20 e7 20 4b 46 4c 41 | 47 28 4e 29 20 8c 20 4b | . KFLA|G(N) . K|
|00000f40| 45 59 43 25 28 4e 29 3d | 43 4f 44 45 53 25 28 4b |EYC%(N)=|CODES%(K|
|00000f50| 4e 28 4e 29 2d 34 29 2b | 26 31 30 2a 43 54 28 4e |N(N)-4)+|&10*CT(N|
|00000f60| 29 0d 05 dc 0a 20 20 20 | ed 20 4e 0d 05 e6 07 20 |).... |. N.... |
|00000f70| 20 cd 0d 05 f0 09 20 20 | d9 23 53 0d 05 fa 06 20 | ..... |.#S.... |
|00000f80| cc 0d 06 04 12 20 20 f4 | 20 6f 6c 64 20 66 6f 72 |..... .| old for|
|00000f90| 6d 61 74 0d 06 0e 0b 20 | 20 cf 23 53 3d 30 0d 06 |mat.... | .#S=0..|
|00000fa0| 18 0d 20 20 e8 23 53 2c | 44 4f 4e 0d 06 22 13 20 |.. .#S,|DON..". |
|00000fb0| 20 e3 20 4e 3d 30 20 b8 | 20 44 4f 4e 2d 31 0d 06 | . N=0 .| DON-1..|
|00000fc0| 2c 25 20 20 20 e8 23 53 | 2c 50 24 28 4e 29 2c 4b |,% .#S|,P$(N),K|
|00000fd0| 46 4c 41 47 28 4e 29 2c | 4b 4e 28 4e 29 2c 43 54 |FLAG(N),|KN(N),CT|
|00000fe0| 28 4e 29 0d 06 36 36 20 | 20 20 e7 20 4b 46 4c 41 |(N)..66 | . KFLA|
|00000ff0| 47 28 4e 29 20 8c 20 4b | 45 59 43 25 28 4e 29 3d |G(N) . K|EYC%(N)=|
|00001000| 43 4f 44 45 53 25 28 4b | 4e 28 4e 29 2d 34 29 2b |CODES%(K|N(N)-4)+|
|00001010| 26 31 30 2a 43 54 28 4e | 29 0d 06 40 09 20 20 ed |&10*CT(N|)..@. .|
|00001020| 20 4e 0d 06 4a 09 20 20 | d9 23 53 0d 06 54 06 20 | N..J. |.#S..T. |
|00001030| cd 0d 06 5e 05 e1 0d 06 | 68 04 0d 06 72 10 dd 20 |...^....|h...r.. |
|00001040| f2 62 6f 6f 74 5f 64 6f | 63 6b 0d 06 7c 0e 20 e7 |.boot_do|ck..|. .|
|00001050| 20 44 4f 4e 3e 30 20 8c | 0d 06 86 13 20 20 e3 20 | DON>0 .|.... . |
|00001060| 4e 3d 30 20 b8 20 44 4f | 4e 2d 31 0d 06 90 17 20 |N=0 . DO|N-1.... |
|00001070| 20 20 53 50 24 3d a4 6c | 65 61 66 28 50 24 28 4e | SP$=.l|eaf(P$(N|
|00001080| 29 29 0d 06 9a 16 20 20 | 20 e7 20 c0 53 50 24 2c |)).... | . .SP$,|
|00001090| 31 29 3d 22 21 22 20 8c | 0d 06 a4 2f 20 20 20 20 |1)="!" .|.../ |
|000010a0| c8 99 20 22 58 57 69 6d | 70 5f 53 70 72 69 74 65 |.. "XWim|p_Sprite|
|000010b0| 4f 70 22 2c 32 35 36 2b | 34 30 2c 2c 53 50 24 20 |Op",256+|40,,SP$ |
|000010c0| b8 20 3b 46 4c 47 25 0d | 06 ae 14 20 20 20 20 e7 |. ;FLG%.|... .|
|000010d0| 20 46 4c 47 25 20 80 20 | 31 20 8c 0d 06 b8 2c 20 | FLG% . |1 ...., |
|000010e0| 20 20 20 c8 99 20 22 58 | 4f 53 5f 46 69 6c 65 22 | .. "X|OS_File"|
|000010f0| 2c 31 37 2c 50 24 28 4e | 29 2b 22 2e 21 42 6f 6f |,17,P$(N|)+".!Boo|
|00001100| 74 22 20 b8 20 54 59 0d | 06 c2 10 20 20 20 20 e7 |t" . TY.|... .|
|00001110| 20 54 59 3d 30 20 8c 0d | 06 cc 3e 20 20 20 20 20 | TY=0 ..|..> |
|00001120| c8 99 20 22 58 4f 53 5f | 43 4c 49 22 2c 22 49 43 |.. "XOS_|CLI","IC|
|00001130| 4f 4e 53 50 52 49 54 45 | 53 20 22 2b 50 24 28 4e |ONSPRITE|S "+P$(N|
|00001140| 29 2b 22 2e 21 53 70 72 | 69 74 65 73 22 20 b8 20 |)+".!Spr|ites" . |
|00001150| 3b 46 4c 47 25 0d 06 d6 | 09 20 20 20 20 cc 0d 06 |;FLG%...|. ...|
|00001160| e0 3b 20 20 20 20 20 c8 | 99 20 22 58 57 69 6d 70 |.; .|. "XWimp|
|00001170| 5f 53 74 61 72 74 54 61 | 73 6b 22 2c 22 52 75 6e |_StartTa|sk","Run|
|00001180| 20 22 2b 50 24 28 4e 29 | 2b 22 2e 21 42 6f 6f 74 | "+P$(N)|+".!Boot|
|00001190| 22 20 b8 20 3b 46 4c 47 | 25 0d 06 ea 09 20 20 20 |" . ;FLG|%.... |
|000011a0| 20 cd 0d 06 f4 14 20 20 | 20 20 e7 20 46 4c 47 25 | ..... | . FLG%|
|000011b0| 20 80 20 31 20 8c 0d 06 | fe 71 20 20 20 20 20 e7 | . 1 ...|.q .|
|000011c0| 20 a4 65 72 72 63 28 50 | 24 28 4e 29 2b 22 20 6e | .errc(P|$(N)+" n|
|000011d0| 6f 74 20 66 6f 75 6e 64 | 2c 20 4f 4b 20 74 6f 20 |ot found|, OK to |
|000011e0| 63 6f 6e 74 69 6e 75 65 | 2c 20 43 61 6e 63 65 6c |continue|, Cancel|
|000011f0| 20 74 6f 20 63 61 6e 63 | 65 6c 20 61 6c 6c 20 66 | to canc|el all f|
|00001200| 6f 6c 6c 6f 77 69 6e 67 | 20 64 6f 63 6b 20 65 6e |ollowing| dock en|
|00001210| 74 72 69 65 73 22 29 3d | 32 20 8c 20 44 4f 4e 3d |tries")=|2 . DON=|
|00001220| 4e 3a d9 23 53 3a e1 0d | 07 08 1c 20 20 20 20 20 |N:.#S:..|... |
|00001230| 50 24 28 4e 29 3d 22 22 | 3a 4b 46 4c 41 47 28 4e |P$(N)=""|:KFLAG(N|
|00001240| 29 3d a3 0d 07 12 0a 20 | 20 20 20 20 cd 0d 07 1c |)=..... | ....|
|00001250| 09 20 20 20 20 cd 0d 07 | 26 08 20 20 20 cd 0d 07 |. ...|&. ...|
|00001260| 30 09 20 20 ed 20 4e 0d | 07 3a 06 20 cd 0d 07 44 |0. . N.|.:. ...D|
|00001270| 05 e1 0d 07 4e 04 0d 07 | 58 0e dd 20 f2 72 65 61 |....N...|X.. .rea|
|00001280| 64 5f 73 63 0d 07 62 07 | ea 20 85 0d 07 6c 55 ee |d_sc..b.|. ...lU.|
|00001290| 20 85 20 ea 3a d9 23 53 | 3a f2 65 72 72 65 70 6f | . .:.#S|:.errepo|
|000012a0| 72 74 28 22 49 6e 76 61 | 6c 69 64 20 21 53 68 6f |rt("Inva|lid !Sho|
|000012b0| 72 74 43 75 74 73 20 66 | 69 6c 65 20 28 22 2b f6 |rtCuts f|ile ("+.|
|000012c0| 24 2b 22 2c 20 65 72 72 | 6f 72 20 63 6f 64 65 20 |$+", err|or code |
|000012d0| 22 2b c3 9e 29 3a 41 50 | 50 4e 55 4d 3d 30 3a e1 |"+..):AP|PNUM=0:.|
|000012e0| 0d 07 76 21 20 53 3d 8e | 28 22 3c 44 6f 63 6b 24 |..v! S=.|("<Dock$|
|000012f0| 44 69 72 3e 2e 21 53 68 | 6f 72 74 43 75 74 73 22 |Dir>.!Sh|ortCuts"|
|00001300| 29 0d 07 80 17 20 e7 20 | 53 3d 30 20 8c 20 41 50 |).... . |S=0 . AP|
|00001310| 50 4e 55 4d 3d 30 3a e1 | 0d 07 8a 0b 20 42 31 3d |PNUM=0:.|.... B1=|
|00001320| 9a 23 53 0d 07 94 2f 20 | e7 20 42 31 3c 3e 97 22 |.#S.../ |. B1<>."|
|00001330| 56 22 20 8c 20 85 20 31 | 2c 22 49 6e 76 61 6c 69 |V" . . 1|,"Invali|
|00001340| 64 20 21 53 68 6f 72 74 | 43 75 74 73 20 66 69 6c |d !Short|Cuts fil|
|00001350| 65 22 0d 07 9e 20 20 42 | 32 3d 9a 23 53 3a 42 33 |e"... B|2=.#S:B3|
|00001360| 3d 9a 23 53 3a 42 34 3d | 9a 23 53 3a 42 35 3d 9a |=.#S:B4=|.#S:B5=.|
|00001370| 23 53 0d 07 a8 13 20 56 | 24 3d bd 42 32 2b bd 42 |#S.... V|$=.B2+.B|
|00001380| 33 2b bd 42 34 0d 07 b2 | 27 20 42 31 3d 9a 23 53 |3+.B4...|' B1=.#S|
|00001390| 3a 42 32 3d 9a 23 53 3a | 42 33 3d 9a 23 53 3a 42 |:B2=.#S:|B3=.#S:B|
|000013a0| 34 3d 9a 23 53 3a 42 35 | 3d 9a 23 53 0d 07 bc 1b |4=.#S:B5|=.#S....|
|000013b0| 20 44 50 4f 53 3d 42 31 | 2d 34 38 3a 53 43 50 4f | DPOS=B1|-48:SCPO|
|000013c0| 53 3d 42 32 2d 34 38 0d | 07 c6 1b 20 50 41 44 3d |S=B2-48.|... PAD=|
|000013d0| 28 42 33 3d 34 39 29 3a | 53 43 3d 28 42 34 3d 34 |(B3=49):|SC=(B4=4|
|000013e0| 39 29 0d 07 d0 17 20 41 | 50 50 4e 55 4d 3d a4 67 |9).... A|PPNUM=.g|
|000013f0| 65 74 5f 6e 75 6d 28 53 | 29 0d 07 da 11 20 e7 20 |et_num(S|).... . |
|00001400| 41 50 50 4e 55 4d 3e 30 | 20 8c 0d 07 e4 16 20 20 |APPNUM>0| ..... |
|00001410| e3 20 4e 3d 30 20 b8 20 | 41 50 50 4e 55 4d 2d 31 |. N=0 . |APPNUM-1|
|00001420| 0d 07 ee 1b 20 20 20 41 | 50 50 24 28 4e 29 3d a4 |.... A|PP$(N)=.|
|00001430| 67 65 74 5f 6c 69 6e 65 | 28 53 29 0d 07 f8 1a 20 |get_line|(S).... |
|00001440| 20 20 53 43 4f 4e 28 4e | 29 3d a4 67 65 74 5f 6e | SCON(N|)=.get_n|
|00001450| 75 6d 28 53 29 0d 08 02 | 0e 20 20 20 e7 20 4d 3e |um(S)...|. . M>|
|00001460| 30 20 8c 0d 08 0c 19 20 | 20 20 20 e3 20 4d 3d 30 |0 ..... | . M=0|
|00001470| 20 b8 20 53 43 4f 4e 28 | 4e 29 2d 31 0d 08 16 18 | . SCON(|N)-1....|
|00001480| 20 20 20 20 20 41 24 3d | a4 67 65 74 5f 6c 69 6e | A$=|.get_lin|
|00001490| 65 28 53 29 0d 08 20 21 | 20 20 20 20 20 53 43 4b |e(S).. !| SCK|
|000014a0| 45 59 43 25 28 4e 2c 4d | 29 3d a4 67 65 74 5f 6e |EYC%(N,M|)=.get_n|
|000014b0| 75 6d 28 53 29 0d 08 2a | 1a 20 20 20 20 20 f2 73 |um(S)..*|. .s|
|000014c0| 65 74 5f 73 63 5f 6f 28 | 4e 2c 4d 2c 41 24 29 0d |et_sc_o(|N,M,A$).|
|000014d0| 08 34 0b 20 20 20 20 ed | 20 4d 0d 08 3e 08 20 20 |.4. .| M..>. |
|000014e0| 20 cd 0d 08 48 09 20 20 | ed 20 4e 0d 08 52 06 20 | ...H. |. N..R. |
|000014f0| cd 0d 08 5c 08 20 d9 23 | 53 0d 08 66 05 e1 0d 08 |...\. .#|S..f....|
|00001500| 70 04 0d 08 7a 12 dd 20 | f2 63 68 65 63 6b 5f 6d |p...z.. |.check_m|
|00001510| 6f 75 73 65 0d 08 84 2b | 20 58 25 3d 21 42 55 46 |ouse...+| X%=!BUF|
|00001520| 46 45 52 25 3a 59 25 3d | 42 55 46 46 45 52 25 21 |FER%:Y%=|BUFFER%!|
|00001530| 34 3a 42 54 25 3d 42 55 | 46 46 45 52 25 21 38 0d |4:BT%=BU|FFER%!8.|
|00001540| 08 8e 28 20 48 41 4e 44 | 4c 45 25 3d 42 55 46 46 |..( HAND|LE%=BUFF|
|00001550| 45 52 25 21 31 32 3a 49 | 43 4f 4e 25 3d 42 55 46 |ER%!12:I|CON%=BUF|
|00001560| 46 45 52 25 21 31 36 0d | 08 98 2c 20 e7 20 48 41 |FER%!16.|.., . HA|
|00001570| 4e 44 4c 45 25 3d 64 6f | 63 6b 5f 68 25 20 8c 20 |NDLE%=do|ck_h% . |
|00001580| 46 45 4c 44 25 3d 49 43 | 4f 4e 25 20 81 20 32 2b |FELD%=IC|ON% . 2+|
|00001590| 44 4f 46 0d 08 a2 2b 20 | e7 20 48 41 4e 44 4c 45 |DOF...+ |. HANDLE|
|000015a0| 25 3d 64 65 66 63 75 74 | 5f 68 25 20 8c 20 46 45 |%=defcut|_h% . FE|
|000015b0| 4c 44 25 3d 49 43 4f 4e | 25 2b 53 43 4f 46 0d 08 |LD%=ICON|%+SCOF..|
|000015c0| ac 10 20 e7 20 42 54 25 | 20 80 20 32 20 8c 0d 08 |.. . BT%| . 2 ...|
|000015d0| b6 19 20 20 e7 20 48 41 | 4e 44 4c 45 25 3d 64 6f |.. . HA|NDLE%=do|
|000015e0| 63 6b 5f 68 25 20 8c 0d | 08 c0 15 20 20 20 e7 20 |ck_h% ..|... . |
|000015f0| 46 45 4c 44 25 3e 3d 44 | 4f 4e 20 8c 0d 08 ca 19 |FELD%>=D|ON .....|
|00001600| 20 20 20 20 24 61 70 70 | 6e 61 6d 65 3d 22 28 6e | $app|name="(n|
|00001610| 6f 6e 65 29 22 0d 08 d4 | 20 20 20 20 20 f2 72 65 |one)"...| .re|
|00001620| 73 65 74 28 22 28 6e 6f | 6e 22 2c 4d 45 4e 55 25 |set("(no|n",MENU%|
|00001630| 2c 30 2c 30 29 0d 08 de | 1f 20 20 20 20 f2 73 65 |,0,0)...|. .se|
|00001640| 74 28 22 28 6e 6f 6e 22 | 2c 4d 45 4e 55 25 2c 38 |t("(non"|,MENU%,8|
|00001650| 2c 32 32 29 0d 08 e8 1f | 20 20 20 20 f2 73 65 74 |,22)....| .set|
|00001660| 28 22 49 6e 73 65 22 2c | 4d 45 4e 55 25 2c 38 2c |("Inse",|MENU%,8,|
|00001670| 32 32 29 0d 08 f2 1f 20 | 20 20 20 f2 73 65 74 28 |22).... | .set(|
|00001680| 22 44 65 6c 65 22 2c 4d | 45 4e 55 25 2c 38 2c 32 |"Dele",M|ENU%,8,2|
|00001690| 32 29 0d 08 fc 08 20 20 | 20 cc 0d 09 06 19 20 20 |2).... | ..... |
|000016a0| 20 20 24 61 70 70 6e 61 | 6d 65 3d 22 28 6e 6f 6e | $appna|me="(non|
|000016b0| 65 29 22 0d 09 10 21 20 | 20 20 20 f2 72 65 73 65 |e)"...! | .rese|
|000016c0| 74 28 22 28 6e 6f 6e 22 | 2c 4d 45 4e 55 25 2c 38 |t("(non"|,MENU%,8|
|000016d0| 2c 32 32 29 0d 09 1a 21 | 20 20 20 20 f2 72 65 73 |,22)...!| .res|
|000016e0| 65 74 28 22 49 6e 73 65 | 22 2c 4d 45 4e 55 25 2c |et("Inse|",MENU%,|
|000016f0| 38 2c 32 32 29 0d 09 24 | 21 20 20 20 20 f2 72 65 |8,22)..$|! .re|
|00001700| 73 65 74 28 22 44 65 6c | 65 22 2c 4d 45 4e 55 25 |set("Del|e",MENU%|
|00001710| 2c 38 2c 32 32 29 0d 09 | 2e 18 20 20 20 20 e7 20 |,8,22)..|.. . |
|00001720| 4b 46 4c 41 47 28 46 45 | 4c 44 25 29 20 8c 0d 09 |KFLAG(FE|LD%) ...|
|00001730| 38 1f 20 20 20 20 20 f2 | 73 65 74 28 22 28 6e 6f |8. .|set("(no|
|00001740| 6e 22 2c 4d 45 4e 55 25 | 2c 30 2c 30 29 0d 09 42 |n",MENU%|,0,0)..B|
|00001750| 13 20 20 20 20 20 f2 63 | 6c 65 61 72 5f 61 6c 6c |. .c|lear_all|
|00001760| 0d 09 4c 1a 20 20 20 20 | 20 21 42 55 46 46 45 52 |..L. | !BUFFER|
|00001770| 25 3d 73 68 6f 72 74 5f | 68 25 0d 09 56 41 20 20 |%=short_|h%..VA |
|00001780| 20 20 20 42 55 46 46 45 | 52 25 21 34 3d 4b 4e 28 | BUFFE|R%!4=KN(|
|00001790| 46 45 4c 44 25 29 3a 42 | 55 46 46 45 52 25 21 38 |FELD%):B|UFFER%!8|
|000017a0| 3d 28 31 3c 3c 32 31 29 | 3a 42 55 46 46 45 52 25 |=(1<<21)|:BUFFER%|
|000017b0| 21 31 32 3d 28 31 3c 3c | 32 31 29 0d 09 60 28 20 |!12=(1<<|21)..`( |
|000017c0| 20 20 20 20 c8 99 20 22 | 57 69 6d 70 5f 53 65 74 | .. "|Wimp_Set|
|000017d0| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 42 55 46 46 |IconStat|e",,BUFF|
|000017e0| 45 52 25 0d 09 6a 1c 20 | 20 20 20 20 42 55 46 46 |ER%..j. | BUFF|
|000017f0| 45 52 25 21 34 3d 43 54 | 28 46 45 4c 44 25 29 0d |ER%!4=CT|(FELD%).|
|00001800| 09 74 28 20 20 20 20 20 | c8 99 20 22 57 69 6d 70 |.t( |.. "Wimp|
|00001810| 5f 53 65 74 49 63 6f 6e | 53 74 61 74 65 22 2c 2c |_SetIcon|State",,|
|00001820| 42 55 46 46 45 52 25 0d | 09 7e 09 20 20 20 20 cc |BUFFER%.|.~. .|
|00001830| 0d 09 88 21 20 20 20 20 | 20 f2 72 65 73 65 74 28 |...! | .reset(|
|00001840| 22 28 6e 6f 6e 22 2c 4d | 45 4e 55 25 2c 30 2c 30 |"(non",M|ENU%,0,0|
|00001850| 29 0d 09 92 13 20 20 20 | 20 20 f2 63 6c 65 61 72 |).... | .clear|
|00001860| 5f 61 6c 6c 0d 09 9c 09 | 20 20 20 20 cd 0d 09 a6 |_all....| ....|
|00001870| 29 20 20 20 20 24 61 70 | 70 6e 61 6d 65 3d 22 27 |) $ap|pname="'|
|00001880| 22 2b a4 6c 65 61 66 28 | 50 24 28 46 45 4c 44 25 |"+.leaf(|P$(FELD%|
|00001890| 29 29 2b 22 27 22 0d 09 | b0 2e 20 20 20 20 24 73 |))+"'"..|.. $s|
|000018a0| 68 6f 72 74 74 62 3d a4 | 6c 65 61 66 28 50 24 28 |horttb=.|leaf(P$(|
|000018b0| 46 45 4c 44 25 29 29 2b | 22 3a 20 53 68 6f 72 74 |FELD%))+|": Short|
|000018c0| 63 75 74 22 0d 09 ba 08 | 20 20 20 cd 0d 09 c4 2e |cut"....| .....|
|000018d0| 20 20 20 c8 99 20 22 57 | 69 6d 70 5f 43 72 65 61 | .. "W|imp_Crea|
|000018e0| 74 65 4d 65 6e 75 22 2c | 2c 4d 45 4e 55 25 2c 58 |teMenu",|,MENU%,X|
|000018f0| 25 2d 31 36 2c 59 25 2d | 31 36 0d 09 ce 13 20 20 |%-16,Y%-|16.... |
|00001900| 20 43 4d 45 4e 55 25 3d | 4d 45 4e 55 25 0d 09 d8 | CMENU%=|MENU%...|
|00001910| 15 20 20 20 4d 45 4e 49 | 43 4f 4e 25 3d 46 45 4c |. MENI|CON%=FEL|
|00001920| 44 25 0d 09 e2 07 20 20 | cd 0d 09 ec 1b 20 20 e7 |D%.... |..... .|
|00001930| 20 48 41 4e 44 4c 45 25 | 3d 64 65 66 63 75 74 5f | HANDLE%|=defcut_|
|00001940| 68 25 20 8c 0d 09 f6 1e | 20 20 20 e7 20 45 44 46 |h% .....| . EDF|
|00001950| 4c 41 47 20 80 20 28 41 | 50 50 4e 55 4d 3e 30 29 |LAG . (A|PPNUM>0)|
|00001960| 20 8c 0d 0a 00 22 20 20 | 20 20 24 65 64 73 63 69 | ...." | $edsci|
|00001970| 30 3d a4 67 65 74 5f 73 | 63 28 41 46 4e 2c 46 45 |0=.get_s|c(AFN,FE|
|00001980| 4c 44 25 29 0d 0a 0a 22 | 20 20 20 20 e7 20 53 43 |LD%)..."| . SC|
|00001990| 4b 45 59 43 25 28 41 46 | 4e 2c 46 45 4c 44 25 29 |KEYC%(AF|N,FELD%)|
|000019a0| 3c 3e 2d 31 20 8c 0d 0a | 14 2c 20 20 20 20 20 24 |<>-1 ...|., $|
|000019b0| 65 64 73 63 69 32 3d 22 | 28 22 2b c3 53 43 4b 45 |edsci2="|("+.SCKE|
|000019c0| 59 43 25 28 41 46 4e 2c | 46 45 4c 44 25 29 2b 22 |YC%(AFN,|FELD%)+"|
|000019d0| 29 22 0d 0a 1e 09 20 20 | 20 20 cc 0d 0a 28 19 20 |)".... | ...(. |
|000019e0| 20 20 20 20 24 65 64 73 | 63 69 32 3d 22 28 6e 6f | $eds|ci2="(no|
|000019f0| 6e 65 29 22 0d 0a 32 09 | 20 20 20 20 cd 0d 0a 3c |ne)"..2.| ...<|
|00001a00| 22 20 20 20 20 f2 72 65 | 73 65 74 28 22 53 68 6f |" .re|set("Sho|
|00001a10| 72 22 2c 4d 45 4e 55 32 | 25 2c 38 2c 32 32 29 0d |r",MENU2|%,8,22).|
|00001a20| 0a 46 1b 20 20 20 20 e7 | 20 46 45 4c 44 25 3c 53 |.F. .| FELD%<S|
|00001a30| 43 4f 4e 28 41 46 4e 29 | 20 8c 0d 0a 50 23 20 20 |CON(AFN)| ...P# |
|00001a40| 20 20 20 f2 72 65 73 65 | 74 28 22 44 65 6c 65 22 | .rese|t("Dele"|
|00001a50| 2c 4d 45 4e 55 32 25 2c | 38 2c 32 32 29 0d 0a 5a |,MENU2%,|8,22)..Z|
|00001a60| 23 20 20 20 20 20 f2 72 | 65 73 65 74 28 22 49 6e |# .r|eset("In|
|00001a70| 73 65 22 2c 4d 45 4e 55 | 32 25 2c 38 2c 32 32 29 |se",MENU|2%,8,22)|
|00001a80| 0d 0a 64 09 20 20 20 20 | cc 0d 0a 6e 21 20 20 20 |..d. |...n! |
|00001a90| 20 20 f2 73 65 74 28 22 | 44 65 6c 65 22 2c 4d 45 | .set("|Dele",ME|
|00001aa0| 4e 55 32 25 2c 38 2c 32 | 32 29 0d 0a 78 21 20 20 |NU2%,8,2|2)..x! |
|00001ab0| 20 20 20 f2 73 65 74 28 | 22 49 6e 73 65 22 2c 4d | .set(|"Inse",M|
|00001ac0| 45 4e 55 32 25 2c 38 2c | 32 32 29 0d 0a 82 09 20 |ENU2%,8,|22).... |
|00001ad0| 20 20 20 cd 0d 0a 8c 08 | 20 20 20 cc 0d 0a 96 20 | .....| .... |
|00001ae0| 20 20 20 20 f2 73 65 74 | 28 22 53 68 6f 72 22 2c | .set|("Shor",|
|00001af0| 4d 45 4e 55 32 25 2c 38 | 2c 32 32 29 0d 0a a0 20 |MENU2%,8|,22)... |
|00001b00| 20 20 20 20 f2 73 65 74 | 28 22 49 6e 73 65 22 2c | .set|("Inse",|
|00001b10| 4d 45 4e 55 32 25 2c 38 | 2c 32 32 29 0d 0a aa 20 |MENU2%,8|,22)... |
|00001b20| 20 20 20 20 f2 73 65 74 | 28 22 44 65 6c 65 22 2c | .set|("Dele",|
|00001b30| 4d 45 4e 55 32 25 2c 38 | 2c 32 32 29 0d 0a b4 08 |MENU2%,8|,22)....|
|00001b40| 20 20 20 cd 0d 0a be 2f | 20 20 20 c8 99 20 22 57 | ..../| .. "W|
|00001b50| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|00001b60| 2c 4d 45 4e 55 32 25 2c | 58 25 2d 31 36 2c 59 25 |,MENU2%,|X%-16,Y%|
|00001b70| 2d 31 36 0d 0a c8 14 20 | 20 20 43 4d 45 4e 55 25 |-16.... | CMENU%|
|00001b80| 3d 4d 45 4e 55 32 25 0d | 0a d2 15 20 20 20 4d 45 |=MENU2%.|... ME|
|00001b90| 4e 49 43 4f 4e 25 3d 46 | 45 4c 44 25 0d 0a dc 07 |NICON%=F|ELD%....|
|00001ba0| 20 20 cd 0d 0a e6 06 20 | cd 0d 0a f0 10 20 e7 20 | ..... |..... . |
|00001bb0| 42 54 25 20 80 20 35 20 | 8c 0d 0a fa 25 20 20 e7 |BT% . 5 |....% .|
|00001bc0| 20 48 41 4e 44 4c 45 25 | 3d 65 64 69 74 5f 68 25 | HANDLE%|=edit_h%|
|00001bd0| 20 8c 20 f2 65 64 69 74 | 5f 63 6c 69 63 6b 0d 0b | . .edit|_click..|
|00001be0| 04 23 20 20 e7 20 48 41 | 4e 44 4c 45 25 3d 65 64 |.# . HA|NDLE%=ed|
|00001bf0| 73 63 5f 68 25 20 80 20 | 49 43 4f 4e 25 3d 33 20 |sc_h% . |ICON%=3 |
|00001c00| 8c 0d 0b 0e 21 20 20 20 | f2 73 65 74 5f 73 63 28 |....! |.set_sc(|
|00001c10| 41 46 4e 2c 46 45 4c 44 | 25 2c 24 65 64 73 63 69 |AFN,FELD|%,$edsci|
|00001c20| 30 29 0d 0b 18 2d 20 20 | 20 e7 20 53 43 4f 4e 28 |0)...- | . SCON(|
|00001c30| 41 46 4e 29 3c 3d 46 45 | 4c 44 25 20 8c 20 53 43 |AFN)<=FE|LD% . SC|
|00001c40| 4f 4e 28 41 46 4e 29 3d | 46 45 4c 44 25 2b 31 0d |ON(AFN)=|FELD%+1.|
|00001c50| 0b 22 1f 20 20 20 c8 99 | 20 22 57 69 6d 70 5f 43 |.". ..| "Wimp_C|
|00001c60| 72 65 61 74 65 4d 65 6e | 75 22 2c 2c 2d 31 0d 0b |reateMen|u",,-1..|
|00001c70| 2c 07 20 20 cd 0d 0b 36 | 19 20 20 e7 20 48 41 4e |,. ...6|. . HAN|
|00001c80| 44 4c 45 25 3d 64 6f 63 | 6b 5f 68 25 20 8c 0d 0b |DLE%=doc|k_h% ...|
|00001c90| 40 16 20 20 20 f2 73 74 | 61 72 74 28 46 45 4c 44 |@. .st|art(FELD|
|00001ca0| 25 2c b9 29 0d 0b 4a 07 | 20 20 cd 0d 0b 54 3d 20 |%,.)..J.| ...T= |
|00001cb0| 20 e7 20 28 48 41 4e 44 | 4c 45 25 3d 64 6f 77 6e | . (HAND|LE%=down|
|00001cc0| 5f 68 25 20 80 20 42 54 | 25 3d 34 29 20 84 20 28 |_h% . BT|%=4) . (|
|00001cd0| 48 41 4e 44 4c 45 25 3d | 75 70 5f 68 25 20 80 20 |HANDLE%=|up_h% . |
|00001ce0| 42 54 25 3d 31 29 20 8c | 0d 0b 5e 2b 20 20 20 44 |BT%=1) .|..^+ D|
|00001cf0| 4f 46 2b 3d 4e 4f 44 3a | e7 20 44 4f 46 2b 4e 4f |OF+=NOD:|. DOF+NO|
|00001d00| 44 3e 4d 41 58 20 8c 20 | 44 4f 46 3d 4d 41 58 2d |D>MAX . |DOF=MAX-|
|00001d10| 4e 4f 44 0d 0b 68 15 20 | 20 20 f2 6f 70 65 6e 5f |NOD..h. | .open_|
|00001d20| 64 6f 63 6b 28 2d 32 29 | 0d 0b 72 07 20 20 cd 0d |dock(-2)|..r. ..|
|00001d30| 0b 7c 3d 20 20 e7 20 28 | 48 41 4e 44 4c 45 25 3d |.|= . (|HANDLE%=|
|00001d40| 64 6f 77 6e 5f 68 25 20 | 80 20 42 54 25 3d 31 29 |down_h% |. BT%=1)|
|00001d50| 20 84 20 28 48 41 4e 44 | 4c 45 25 3d 75 70 5f 68 | . (HAND|LE%=up_h|
|00001d60| 25 20 80 20 42 54 25 3d | 34 29 20 8c 0d 0b 86 0f |% . BT%=|4) .....|
|00001d70| 20 20 20 44 4f 46 2d 3d | 4e 4f 44 0d 0b 90 1e 20 | DOF-=|NOD.... |
|00001d80| 20 20 e7 20 44 4f 46 3c | 30 20 84 20 44 4f 46 3d | . DOF<|0 . DOF=|
|00001d90| 31 20 8c 20 44 4f 46 3d | 30 0d 0b 9a 15 20 20 20 |1 . DOF=|0.... |
|00001da0| f2 6f 70 65 6e 5f 64 6f | 63 6b 28 2d 32 29 0d 0b |.open_do|ck(-2)..|
|00001db0| a4 07 20 20 cd 0d 0b ae | 1b 20 20 e7 20 48 41 4e |.. ....|. . HAN|
|00001dc0| 44 4c 45 25 3d 64 65 66 | 63 75 74 5f 68 25 20 8c |DLE%=def|cut_h% .|
|00001dd0| 0d 0b b8 11 20 20 20 e7 | 20 45 44 46 4c 41 47 20 |.... .| EDFLAG |
|00001de0| 8c 0d 0b c2 3a 20 20 20 | 20 f2 65 72 72 65 70 6f |....: | .errepo|
|00001df0| 72 74 28 22 43 6c 6f 73 | 65 20 74 68 65 20 45 64 |rt("Clos|e the Ed|
|00001e00| 69 74 20 73 68 6f 72 74 | 63 75 74 20 77 69 6e 64 |it short|cut wind|
|00001e10| 6f 77 20 66 69 72 73 74 | 2e 22 29 0d 0b cc 08 20 |ow first|.").... |
|00001e20| 20 20 cc 0d 0b d6 0e 20 | 20 20 20 e7 20 41 46 20 | ..... | . AF |
|00001e30| 8c 0d 0b e0 23 20 20 20 | 20 20 e7 20 a4 67 65 74 |....# | . .get|
|00001e40| 5f 73 63 28 41 46 4e 2c | 46 45 4c 44 25 29 3c 3e |_sc(AFN,|FELD%)<>|
|00001e50| 22 22 20 8c 0d 0b ea 20 | 20 20 20 20 20 20 f2 69 |"" .... | .i|
|00001e60| 73 73 75 65 5f 73 68 6f | 72 74 63 75 74 28 46 45 |ssue_sho|rtcut(FE|
|00001e70| 4c 44 25 29 0d 0b f4 0a | 20 20 20 20 20 cd 0d 0b |LD%)....| ...|
|00001e80| fe 09 20 20 20 20 cd 0d | 0c 08 08 20 20 20 cd 0d |.. ..|... ..|
|00001e90| 0c 12 07 20 20 cd 0d 0c | 1c 44 20 20 e7 20 28 48 |... ...|.D . (H|
|00001ea0| 41 4e 44 4c 45 25 3d 73 | 63 72 69 67 68 74 5f 68 |ANDLE%=s|cright_h|
|00001eb0| 25 20 80 20 42 54 25 3d | 34 29 20 84 20 28 48 41 |% . BT%=|4) . (HA|
|00001ec0| 4e 44 4c 45 25 3d 73 63 | 6c 65 66 74 5f 68 25 20 |NDLE%=sc|left_h% |
|00001ed0| 80 20 42 54 25 3d 31 29 | 20 8c 0d 0c 26 37 20 20 |. BT%=1)| ...&7 |
|00001ee0| 20 53 43 4f 46 2b 3d 4e | 4f 53 43 3a e7 20 53 43 | SCOF+=N|OSC:. SC|
|00001ef0| 4f 46 2b 4e 4f 53 43 3e | 44 53 43 4d 41 58 20 8c |OF+NOSC>|DSCMAX .|
|00001f00| 20 53 43 4f 46 3d 44 53 | 43 4d 41 58 2d 4e 4f 53 | SCOF=DS|CMAX-NOS|
|00001f10| 43 0d 0c 30 13 20 20 20 | f2 6f 70 65 6e 5f 73 63 |C..0. |.open_sc|
|00001f20| 28 2d 32 29 0d 0c 3a 07 | 20 20 cd 0d 0c 44 44 20 |(-2)..:.| ...DD |
|00001f30| 20 e7 20 28 48 41 4e 44 | 4c 45 25 3d 73 63 72 69 | . (HAND|LE%=scri|
|00001f40| 67 68 74 5f 68 25 20 80 | 20 42 54 25 3d 31 29 20 |ght_h% .| BT%=1) |
|00001f50| 84 20 28 48 41 4e 44 4c | 45 25 3d 73 63 6c 65 66 |. (HANDL|E%=sclef|
|00001f60| 74 5f 68 25 20 80 20 42 | 54 25 3d 34 29 20 8c 0d |t_h% . B|T%=4) ..|
|00001f70| 0c 4e 11 20 20 20 53 43 | 4f 46 2d 3d 4e 4f 53 43 |.N. SC|OF-=NOSC|
|00001f80| 0d 0c 58 21 20 20 20 e7 | 20 53 43 4f 46 3c 30 20 |..X! .| SCOF<0 |
|00001f90| 84 20 53 43 4f 46 3d 31 | 20 8c 20 53 43 4f 46 3d |. SCOF=1| . SCOF=|
|00001fa0| 30 0d 0c 62 13 20 20 20 | f2 6f 70 65 6e 5f 73 63 |0..b. |.open_sc|
|00001fb0| 28 2d 32 29 0d 0c 6c 07 | 20 20 cd 0d 0c 76 1a 20 |(-2)..l.| ...v. |
|00001fc0| 20 e7 20 48 41 4e 44 4c | 45 25 3d 73 68 6f 72 74 | . HANDL|E%=short|
|00001fd0| 5f 68 25 20 8c 0d 0c 80 | 13 20 20 20 e7 20 49 43 |_h% ....|. . IC|
|00001fe0| 4f 4e 25 3d 31 37 20 8c | 0d 0c 8a 11 20 20 20 20 |ON%=17 .|.... |
|00001ff0| f2 73 63 61 6e 5f 6b 65 | 79 0d 0c 94 08 20 20 20 |.scan_ke|y.... |
|00002000| cd 0d 0c 9e 13 20 20 20 | e7 20 49 43 4f 4e 25 3d |..... |. ICON%=|
|00002010| 31 38 20 8c 0d 0c a8 25 | 20 20 20 20 4b 4e 28 4d |18 ....%| KN(M|
|00002020| 45 4e 49 43 4f 4e 25 29 | 3d 30 3a 43 54 28 4d 45 |ENICON%)|=0:CT(ME|
|00002030| 4e 49 43 4f 4e 25 29 3d | 30 0d 0c b2 19 20 20 20 |NICON%)=|0.... |
|00002040| 20 4b 46 4c 41 47 28 4d | 45 4e 49 43 4f 4e 25 29 | KFLAG(M|ENICON%)|
|00002050| 3d a3 0d 0c bc 20 20 20 | 20 20 c8 99 20 22 57 69 |=.... | .. "Wi|
|00002060| 6d 70 5f 43 72 65 61 74 | 65 4d 65 6e 75 22 2c 2c |mp_Creat|eMenu",,|
|00002070| 2d 31 0d 0c c6 08 20 20 | 20 cd 0d 0c d0 07 20 20 |-1.... | ..... |
|00002080| cd 0d 0c da 06 20 cd 0d | 0c e4 05 e1 0d 0c ee 04 |..... ..|........|
|00002090| 0d 0c f8 1b dd 20 f2 69 | 73 73 75 65 5f 73 68 6f |..... .i|ssue_sho|
|000020a0| 72 74 63 75 74 28 46 45 | 4e 25 29 0d 0d 02 1e 20 |rtcut(FE|N%).... |
|000020b0| e7 20 53 43 4b 45 59 43 | 25 28 41 46 4e 2c 46 45 |. SCKEYC|%(AFN,FE|
|000020c0| 4e 25 29 3c 3e 2d 31 20 | 8c 0d 0d 0c 2c 20 20 c8 |N%)<>-1 |...., .|
|000020d0| 99 20 22 57 69 6d 70 5f | 50 72 6f 63 65 73 73 4b |. "Wimp_|ProcessK|
|000020e0| 65 79 22 2c 53 43 4b 45 | 59 43 25 28 41 46 4e 2c |ey",SCKE|YC%(AFN,|
|000020f0| 46 45 4e 25 29 0d 0d 16 | 06 20 cd 0d 0d 20 05 e1 |FEN%)...|. ... ..|
|00002100| 0d 0d 2a 04 0d 0d 34 18 | dd 20 a4 67 65 74 5f 73 |..*...4.|. .get_s|
|00002110| 63 28 41 50 50 25 2c 4e | 55 4d 25 29 0d 0d 3e 10 |c(APP%,N|UM%)..>.|
|00002120| ea 20 53 4e 25 2c 46 46 | 25 2c 41 24 0d 0d 48 16 |. SN%,FF|%,A$..H.|
|00002130| 20 53 4e 25 3d 4e 55 4d | 25 20 81 20 41 4e 5a 50 | SN%=NUM|% . ANZP|
|00002140| 53 25 0d 0d 52 1d 20 46 | 46 25 3d 28 4e 55 4d 25 |S%..R. F|F%=(NUM%|
|00002150| 20 83 20 41 4e 5a 50 53 | 25 29 2a 53 43 4c 25 0d | . ANZPS|%)*SCL%.|
|00002160| 0d 5c 20 20 41 24 3d c1 | 53 44 24 28 41 50 50 25 |.\ A$=.|SD$(APP%|
|00002170| 2c 53 4e 25 29 2c 46 46 | 25 2c 53 43 4c 25 29 0d |,SN%),FF|%,SCL%).|
|00002180| 0d 66 0f 20 50 3d a7 41 | 24 2c bd 31 33 29 0d 0d |.f. P=.A|$,.13)..|
|00002190| 70 18 20 e7 20 50 3e 30 | 20 8c 20 41 24 3d c0 41 |p. . P>0| . A$=.A|
|000021a0| 24 2c 50 2d 31 29 0d 0d | 7a 07 3d 41 24 0d 0d 84 |$,P-1)..|z.=A$...|
|000021b0| 04 0d 0d 8e 1b dd 20 f2 | 73 65 74 5f 73 63 28 41 |...... .|set_sc(A|
|000021c0| 50 50 25 2c 4e 55 4d 25 | 2c 41 24 29 0d 0d 98 1c |PP%,NUM%|,A$)....|
|000021d0| 20 f2 73 65 74 5f 73 63 | 5f 6f 28 41 50 50 25 2c | .set_sc|_o(APP%,|
|000021e0| 4e 55 4d 25 2c 41 24 29 | 0d 0d a2 11 20 f2 6f 70 |NUM%,A$)|.... .op|
|000021f0| 65 6e 5f 73 63 28 2d 32 | 29 0d 0d ac 05 e1 0d 0d |en_sc(-2|).......|
|00002200| b6 04 0d 0d c0 1d dd 20 | f2 73 65 74 5f 73 63 5f |....... |.set_sc_|
|00002210| 6f 28 41 50 50 25 2c 4e | 55 4d 25 2c 41 24 29 0d |o(APP%,N|UM%,A$).|
|00002220| 0d ca 10 ea 20 53 4e 25 | 2c 46 46 25 2c 42 24 0d |.... SN%|,FF%,B$.|
|00002230| 0d d4 16 20 53 4e 25 3d | 4e 55 4d 25 20 81 20 41 |... SN%=|NUM% . A|
|00002240| 4e 5a 50 53 25 0d 0d de | 1d 20 46 46 25 3d 28 4e |NZPS%...|. FF%=(N|
|00002250| 55 4d 25 20 83 20 41 4e | 5a 50 53 25 29 2a 53 43 |UM% . AN|ZPS%)*SC|
|00002260| 4c 25 0d 0d e8 25 20 e7 | 20 a9 28 41 24 29 3c 53 |L%...% .| .(A$)<S|
|00002270| 43 4c 25 20 8c 20 42 24 | 3d 41 24 2b bd 31 33 20 |CL% . B$|=A$+.13 |
|00002280| 8b 20 42 24 3d 41 24 0d | 0d f2 20 20 c1 53 44 24 |. B$=A$.|.. .SD$|
|00002290| 28 41 50 50 25 2c 53 4e | 25 29 2c 46 46 25 2c 53 |(APP%,SN|%),FF%,S|
|000022a0| 43 4c 25 29 3d 42 24 0d | 0d fc 05 e1 0d 0e 06 04 |CL%)=B$.|........|
|000022b0| 0d 0e 10 11 dd 20 f2 65 | 64 69 74 5f 63 6c 69 63 |..... .e|dit_clic|
|000022c0| 6b 0d 0e 1a 0f 20 c8 8e | 20 49 43 4f 4e 25 20 ca |k.... ..| ICON% .|
|000022d0| 0d 0e 24 09 20 c9 20 33 | 3a 0d 0e 2e 1c 20 20 f2 |..$. . 3|:.... .|
|000022e0| 73 65 74 5f 65 64 61 70 | 70 28 2d 31 29 3a 4f 4c |set_edap|p(-1):OL|
|000022f0| 48 25 3d 2d 31 0d 0e 38 | 1e 20 20 f2 63 6c 6f 73 |H%=-1..8|. .clos|
|00002300| 65 28 65 64 69 74 5f 68 | 25 29 3a 45 44 46 4c 41 |e(edit_h|%):EDFLA|
|00002310| 47 3d a3 0d 0e 42 09 20 | c9 20 34 3a 0d 0e 4c 12 |G=...B. |. 4:..L.|
|00002320| 20 20 e7 20 41 50 50 4e | 55 4d 3e 30 20 8c 0d 0e | . APPN|UM>0 ...|
|00002330| 56 28 20 20 20 45 44 41 | 50 50 2b 3d 31 3a e7 20 |V( EDA|PP+=1:. |
|00002340| 45 44 41 50 50 3d 41 50 | 50 4e 55 4d 20 8c 20 45 |EDAPP=AP|PNUM . E|
|00002350| 44 41 50 50 3d 30 0d 0e | 60 18 20 20 20 f2 73 65 |DAPP=0..|`. .se|
|00002360| 74 5f 65 64 61 70 70 28 | 45 44 41 50 50 29 0d 0e |t_edapp(|EDAPP)..|
|00002370| 6a 07 20 20 cd 0d 0e 74 | 09 20 c9 20 35 3a 0d 0e |j. ...t|. . 5:..|
|00002380| 7e 12 20 20 e7 20 41 50 | 50 4e 55 4d 3e 30 20 8c |~. . AP|PNUM>0 .|
|00002390| 0d 0e 88 2b 20 20 20 45 | 44 41 50 50 2d 3d 31 3a |...+ E|DAPP-=1:|
|000023a0| e7 20 45 44 41 50 50 3d | 2d 31 20 8c 20 45 44 41 |. EDAPP=|-1 . EDA|
|000023b0| 50 50 3d 41 50 50 4e 55 | 4d 2d 31 0d 0e 92 18 20 |PP=APPNU|M-1.... |
|000023c0| 20 20 f2 73 65 74 5f 65 | 64 61 70 70 28 45 44 41 | .set_e|dapp(EDA|
|000023d0| 50 50 29 0d 0e 9c 07 20 | 20 cd 0d 0e a6 09 20 c9 |PP).... | ..... .|
|000023e0| 20 36 3a 0d 0e b0 12 20 | 20 e7 20 41 50 50 4e 55 | 6:.... | . APPNU|
|000023f0| 4d 3e 30 20 8c 0d 0e ba | 19 20 20 20 e7 20 45 44 |M>0 ....|. . ED|
|00002400| 41 50 50 3c 41 50 50 4e | 55 4d 2d 31 20 8c 0d 0e |APP<APPN|UM-1 ...|
|00002410| c4 1c 20 20 20 20 e3 20 | 4e 3d 45 44 41 50 50 20 |.. . |N=EDAPP |
|00002420| b8 20 41 50 50 4e 55 4d | 2d 32 0d 0e ce 2c 20 20 |. APPNUM|-2..., |
|00002430| 20 20 20 41 50 50 24 28 | 4e 29 3d 41 50 50 24 28 | APP$(|N)=APP$(|
|00002440| 4e 2b 31 29 3a 53 43 4f | 4e 28 4e 29 3d 53 43 4f |N+1):SCO|N(N)=SCO|
|00002450| 4e 28 4e 2b 31 29 0d 0e | d8 17 20 20 20 20 20 e3 |N(N+1)..|.. .|
|00002460| 20 4d 3d 30 20 b8 20 53 | 41 4e 25 2d 31 0d 0e e2 | M=0 . S|AN%-1...|
|00002470| 1d 20 20 20 20 20 20 53 | 44 24 28 4e 2c 4d 29 3d |. S|D$(N,M)=|
|00002480| 53 44 24 28 4e 2b 31 2c | 4d 29 0d 0e ec 0c 20 20 |SD$(N+1,|M).... |
|00002490| 20 20 20 ed 20 4d 0d 0e | f6 1a 20 20 20 20 20 e3 | . M..|.. .|
|000024a0| 20 4d 3d 30 20 b8 20 53 | 43 4f 4e 28 4e 29 2d 31 | M=0 . S|CON(N)-1|
|000024b0| 0d 0f 00 25 20 20 20 20 | 20 20 53 43 4b 45 59 43 |...% | SCKEYC|
|000024c0| 25 28 4e 2c 4d 29 3d 53 | 43 4b 45 59 43 25 28 4e |%(N,M)=S|CKEYC%(N|
|000024d0| 2b 31 2c 4d 29 0d 0f 0a | 0c 20 20 20 20 20 ed 20 |+1,M)...|. . |
|000024e0| 4d 0d 0f 14 0b 20 20 20 | 20 ed 20 4e 0d 0f 1e 08 |M.... | . N....|
|000024f0| 20 20 20 cc 0d 0f 28 16 | 20 20 20 20 45 44 41 50 | ...(.| EDAP|
|00002500| 50 3d 41 50 50 4e 55 4d | 2d 32 0d 0f 32 08 20 20 |P=APPNUM|-2..2. |
|00002510| 20 cd 0d 0f 3c 22 20 20 | 20 41 50 50 4e 55 4d 2d | ...<" | APPNUM-|
|00002520| 3d 31 3a f2 73 65 74 5f | 65 64 61 70 70 28 45 44 |=1:.set_|edapp(ED|
|00002530| 41 50 50 29 0d 0f 46 07 | 20 20 cd 0d 0f 50 09 20 |APP)..F.| ...P. |
|00002540| c9 20 38 3a 0d 0f 5a 18 | 20 20 e7 20 41 50 50 4e |. 8:..Z.| . APPN|
|00002550| 55 4d 3c 4d 41 58 41 50 | 50 53 20 8c 0d 0f 64 1b |UM<MAXAP|PS ...d.|
|00002560| 20 20 20 41 50 50 24 28 | 41 50 50 4e 55 4d 29 3d | APP$(|APPNUM)=|
|00002570| 24 65 64 69 74 69 39 0d | 0f 6e 1b 20 20 20 e7 20 |$editi9.|.n. . |
|00002580| 41 50 50 24 28 41 50 50 | 4e 55 4d 29 3c 3e 22 22 |APP$(APP|NUM)<>""|
|00002590| 20 8c 0d 0f 78 26 20 20 | 20 20 41 50 50 4e 55 4d | ...x& | APPNUM|
|000025a0| 2b 3d 31 3a f2 73 65 74 | 5f 65 64 61 70 70 28 41 |+=1:.set|_edapp(A|
|000025b0| 50 50 4e 55 4d 2d 31 29 | 0d 0f 82 08 20 20 20 cd |PPNUM-1)|.... .|
|000025c0| 0d 0f 8c 07 20 20 cc 0d | 0f 96 3b 20 20 20 f2 65 |.... ..|..; .e|
|000025d0| 72 72 65 70 6f 72 74 28 | 22 4e 6f 74 20 6d 6f 72 |rreport(|"Not mor|
|000025e0| 65 20 74 68 61 6e 20 22 | 2b c3 4d 41 58 41 50 50 |e than "|+.MAXAPP|
|000025f0| 53 2b 22 20 61 70 70 6c | 69 63 61 74 69 6f 6e 73 |S+" appl|ications|
|00002600| 22 29 0d 0f a0 07 20 20 | cd 0d 0f aa 06 20 cb 0d |").... |..... ..|
|00002610| 0f b4 05 e1 0d 0f be 04 | 0d 0f c8 0f dd 20 f2 73 |........|..... .s|
|00002620| 63 61 6e 5f 6b 65 79 0d | 0f d2 39 20 c8 99 20 22 |can_key.|..9 .. "|
|00002630| 57 69 6d 70 5f 57 68 69 | 63 68 49 63 6f 6e 22 2c |Wimp_Whi|chIcon",|
|00002640| 73 68 6f 72 74 5f 68 25 | 2c 42 55 46 46 45 52 25 |short_h%|,BUFFER%|
|00002650| 2c 26 33 46 30 30 30 30 | 2c 26 32 32 30 30 30 30 |,&3F0000|,&220000|
|00002660| 0d 0f dc 27 20 e7 20 21 | 42 55 46 46 45 52 25 3d |...' . !|BUFFER%=|
|00002670| 2d 31 20 8c 20 53 54 3d | 30 20 8b 20 53 54 3d 21 |-1 . ST=|0 . ST=!|
|00002680| 42 55 46 46 45 52 25 0d | 0f e6 39 20 c8 99 20 22 |BUFFER%.|..9 .. "|
|00002690| 57 69 6d 70 5f 57 68 69 | 63 68 49 63 6f 6e 22 2c |Wimp_Whi|chIcon",|
|000026a0| 73 68 6f 72 74 5f 68 25 | 2c 42 55 46 46 45 52 25 |short_h%|,BUFFER%|
|000026b0| 2c 26 33 46 30 30 30 30 | 2c 26 32 33 30 30 30 30 |,&3F0000|,&230000|
|000026c0| 0d 0f f0 39 20 e7 20 21 | 42 55 46 46 45 52 25 3d |...9 . !|BUFFER%=|
|000026d0| 2d 31 20 8c 20 f2 65 72 | 72 65 70 6f 72 74 28 22 |-1 . .er|report("|
|000026e0| 59 6f 75 20 6d 75 73 74 | 20 73 65 6c 65 63 74 20 |You must| select |
|000026f0| 61 20 6b 65 79 22 29 3a | e1 0d 0f fa 10 20 4b 45 |a key"):|..... KE|
|00002700| 3d 21 42 55 46 46 45 52 | 25 0d 10 04 24 20 43 54 |=!BUFFER|%...$ CT|
|00002710| 28 4d 45 4e 49 43 4f 4e | 25 29 3d 53 54 3a 4b 4e |(MENICON|%)=ST:KN|
|00002720| 28 4d 45 4e 49 43 4f 4e | 25 29 3d 4b 45 0d 10 0e |(MENICON|%)=KE...|
|00002730| 28 20 4b 45 59 43 25 28 | 4d 45 4e 49 43 4f 4e 25 |( KEYC%(|MENICON%|
|00002740| 29 3d 43 4f 44 45 53 25 | 28 4b 45 2d 34 29 2b 26 |)=CODES%|(KE-4)+&|
|00002750| 31 30 2a 53 54 0d 10 18 | 16 20 4b 46 4c 41 47 28 |10*ST...|. KFLAG(|
|00002760| 4d 45 4e 49 43 4f 4e 25 | 29 3d b9 0d 10 22 1d 20 |MENICON%|)=...". |
|00002770| c8 99 20 22 57 69 6d 70 | 5f 43 72 65 61 74 65 4d |.. "Wimp|_CreateM|
|00002780| 65 6e 75 22 2c 2c 2d 31 | 0d 10 2c 05 e1 0d 10 36 |enu",,-1|..,....6|
|00002790| 04 0d 10 40 12 dd 20 f2 | 6b 65 79 5f 70 72 65 73 |...@.. .|key_pres|
|000027a0| 73 65 64 0d 10 4a 07 ea | 20 4e 0d 10 54 3a 20 4b |sed..J..| N..T: K|
|000027b0| 45 59 3d 42 55 46 46 45 | 52 25 21 32 34 3a 48 41 |EY=BUFFE|R%!24:HA|
|000027c0| 4e 44 4c 45 25 3d 21 42 | 55 46 46 45 52 25 3a 49 |NDLE%=!B|UFFER%:I|
|000027d0| 43 4f 4e 25 3d 42 55 46 | 46 45 52 25 21 34 3a 50 |CON%=BUF|FER%!4:P|
|000027e0| 52 4f 3d a3 0d 10 5e 22 | 20 e7 20 48 41 4e 44 4c |RO=...^"| . HANDL|
|000027f0| 45 25 3d 65 64 73 63 5f | 68 25 20 80 20 49 43 4f |E%=edsc_|h% . ICO|
|00002800| 4e 25 3d 31 20 8c 0d 10 | 68 20 20 20 53 43 4b 45 |N%=1 ...|h SCKE|
|00002810| 59 43 25 28 41 46 4e 2c | 46 45 4c 44 25 29 3d 4b |YC%(AFN,|FELD%)=K|
|00002820| 45 59 3a ef 20 37 0d 10 | 72 32 20 20 24 65 64 73 |EY:. 7..|r2 $eds|
|00002830| 63 69 32 3d 22 28 22 2b | c3 4b 45 59 2b 22 29 22 |ci2="("+|.KEY+")"|
|00002840| 3a f2 72 65 64 72 61 77 | 5f 69 63 6f 6e 28 65 64 |:.redraw|_icon(ed|
|00002850| 73 63 5f 68 25 2c 32 29 | 0d 10 7c 06 20 cd 0d 10 |sc_h%,2)|..|. ...|
|00002860| 86 12 20 e3 20 4e 3d 30 | 20 b8 20 44 4f 4e 2d 31 |.. . N=0| . DON-1|
|00002870| 0d 10 90 12 20 20 e7 20 | 4b 46 4c 41 47 28 4e 29 |.... . |KFLAG(N)|
|00002880| 20 8c 0d 10 9a 17 20 20 | 20 e7 20 4b 45 59 43 25 | ..... | . KEYC%|
|00002890| 28 4e 29 3d 4b 45 59 20 | 8c 0d 10 a4 19 20 20 20 |(N)=KEY |..... |
|000028a0| 20 50 52 4f 3d b9 3a f2 | 73 74 61 72 74 28 4e 2c | PRO=.:.|start(N,|
|000028b0| a3 29 0d 10 ae 08 20 20 | 20 cd 0d 10 b8 07 20 20 |.).... | ..... |
|000028c0| cd 0d 10 c2 08 20 ed 20 | 4e 0d 10 cc 27 20 e7 20 |..... . |N...' . |
|000028d0| 50 52 4f 3d a3 20 8c 20 | c8 99 20 22 57 69 6d 70 |PRO=. . |.. "Wimp|
|000028e0| 5f 50 72 6f 63 65 73 73 | 4b 65 79 22 2c 4b 45 59 |_Process|Key",KEY|
|000028f0| 0d 10 d6 05 e1 0d 10 e0 | 04 0d 10 ea 12 dd 20 f2 |........|...... .|
|00002900| 6d 65 6e 75 5f 73 65 6c | 65 63 74 0d 10 f4 31 20 |menu_sel|ect...1 |
|00002910| c8 99 20 22 57 69 6d 70 | 5f 44 65 63 6f 64 65 4d |.. "Wimp|_DecodeM|
|00002920| 65 6e 75 22 2c 2c 43 4d | 45 4e 55 25 2c 42 55 46 |enu",,CM|ENU%,BUF|
|00002930| 46 45 52 25 2c 4f 50 54 | 49 4f 4e 25 0d 10 fe 18 |FER%,OPT|ION%....|
|00002940| 20 e7 20 24 4f 50 54 49 | 4f 4e 25 3d 22 51 75 69 | . $OPTI|ON%="Qui|
|00002950| 74 22 20 8c 0d 11 08 0f | 20 20 f2 66 69 6e 69 73 |t" .....| .finis|
|00002960| 68 3a e0 0d 11 12 06 20 | cd 0d 11 1c 1c 20 e7 20 |h:..... |..... . |
|00002970| 24 4f 50 54 49 4f 4e 25 | 3d 22 53 61 76 65 20 61 |$OPTION%|="Save a|
|00002980| 6c 6c 22 20 8c 0d 11 26 | 1b 20 20 f2 73 61 76 65 |ll" ...&|. .save|
|00002990| 5f 64 6f 63 6b 3a f2 73 | 61 76 65 5f 64 65 66 73 |_dock:.s|ave_defs|
|000029a0| 0d 11 30 06 20 cd 0d 11 | 3a 33 20 e7 20 c0 24 4f |..0. ...|:3 . .$O|
|000029b0| 50 54 49 4f 4e 25 2c 36 | 29 3d 22 50 72 65 66 73 |PTION%,6|)="Prefs|
|000029c0| 2e 22 20 8c 20 f2 70 5f | 73 65 6c 28 c1 24 4f 50 |." . .p_|sel(.$OP|
|000029d0| 54 49 4f 4e 25 2c 37 29 | 29 0d 11 44 15 20 e7 20 |TION%,7)|)..D. . |
|000029e0| 43 4d 45 4e 55 25 3d 4d | 45 4e 55 25 20 8c 0d 11 |CMENU%=M|ENU% ...|
|000029f0| 4e 2a 20 20 e7 20 24 4f | 50 54 49 4f 4e 25 3d 22 |N* . $O|PTION%="|
|00002a00| 44 65 6c 65 74 65 22 20 | 80 20 4d 45 4e 49 43 4f |Delete" |. MENICO|
|00002a10| 4e 25 3c 44 4f 4e 20 8c | 0d 11 58 1b 20 20 20 e3 |N%<DON .|..X. .|
|00002a20| 20 4e 3d 4d 45 4e 49 43 | 4f 4e 25 20 b8 20 44 4f | N=MENIC|ON% . DO|
|00002a30| 4e 2d 31 0d 11 62 4c 20 | 20 20 20 20 50 24 28 4e |N-1..bL | P$(N|
|00002a40| 29 3d 50 24 28 4e 2b 31 | 29 3a 4b 46 4c 41 47 28 |)=P$(N+1|):KFLAG(|
|00002a50| 4e 29 3d 4b 46 4c 41 47 | 28 4e 2b 31 29 3a 43 54 |N)=KFLAG|(N+1):CT|
|00002a60| 28 4e 29 3d 43 54 28 4e | 2b 31 29 3a 4b 45 59 43 |(N)=CT(N|+1):KEYC|
|00002a70| 25 28 4e 29 3d 4b 45 59 | 43 25 28 4e 2b 31 29 0d |%(N)=KEY|C%(N+1).|
|00002a80| 11 6c 16 20 20 20 20 20 | 4b 4e 28 4e 29 3d 4b 4e |.l. |KN(N)=KN|
|00002a90| 28 4e 2b 31 29 0d 11 76 | 0a 20 20 20 ed 20 4e 0d |(N+1)..v|. . N.|
|00002aa0| 11 80 27 20 20 20 50 24 | 28 44 4f 4e 29 3d 22 22 |..' P$|(DON)=""|
|00002ab0| 3a 44 4f 4e 2d 3d 31 3a | f2 6f 70 65 6e 5f 64 6f |:DON-=1:|.open_do|
|00002ac0| 63 6b 28 2d 32 29 0d 11 | 8a 07 20 20 cd 0d 11 94 |ck(-2)..|.. ....|
|00002ad0| 1b 20 20 e7 20 24 4f 50 | 54 49 4f 4e 25 3d 22 49 |. . $OP|TION%="I|
|00002ae0| 6e 73 65 72 74 22 20 8c | 0d 11 9e 12 20 20 20 e7 |nsert" .|.... .|
|00002af0| 20 44 4f 4e 3c 4d 41 58 | 20 8c 0d 11 a8 1e 20 20 | DON<MAX| ..... |
|00002b00| 20 20 e3 20 4e 3d 44 4f | 4e 20 b8 20 4d 45 4e 49 | . N=DO|N . MENI|
|00002b10| 43 4f 4e 25 20 88 2d 31 | 0d 11 b2 4c 20 20 20 20 |CON% .-1|...L |
|00002b20| 20 50 24 28 4e 2b 31 29 | 3d 50 24 28 4e 29 3a 4b | P$(N+1)|=P$(N):K|
|00002b30| 46 4c 41 47 28 4e 2b 31 | 29 3d 4b 46 4c 41 47 28 |FLAG(N+1|)=KFLAG(|
|00002b40| 4e 29 3a 43 54 28 4e 2b | 31 29 3d 43 54 28 4e 29 |N):CT(N+|1)=CT(N)|
|00002b50| 3a 4b 45 59 43 25 28 4e | 2b 31 29 3d 4b 45 59 43 |:KEYC%(N|+1)=KEYC|
|00002b60| 25 28 4e 29 0d 11 bc 16 | 20 20 20 20 20 4b 4e 28 |%(N)....| KN(|
|00002b70| 4e 2b 31 29 3d 4b 4e 28 | 4e 29 0d 11 c6 0b 20 20 |N+1)=KN(|N).... |
|00002b80| 20 20 ed 20 4e 0d 11 d0 | 1e 20 20 20 20 44 4f 4e | . N...|. DON|
|00002b90| 2b 3d 31 3a 50 24 28 4d | 45 4e 49 43 4f 4e 25 29 |+=1:P$(M|ENICON%)|
|00002ba0| 3d 22 22 0d 11 da 16 20 | 20 20 20 f2 6f 70 65 6e |="".... | .open|
|00002bb0| 5f 64 6f 63 6b 28 2d 32 | 29 0d 11 e4 08 20 20 20 |_dock(-2|).... |
|00002bc0| cd 0d 11 ee 07 20 20 cd | 0d 11 f8 06 20 cd 0d 12 |..... .|.... ...|
|00002bd0| 02 16 20 e7 20 43 4d 45 | 4e 55 25 3d 4d 45 4e 55 |.. . CME|NU%=MENU|
|00002be0| 32 25 20 8c 0d 12 0c 1b | 20 20 e7 20 24 4f 50 54 |2% .....| . $OPT|
|00002bf0| 49 4f 4e 25 3d 22 44 65 | 6c 65 74 65 22 20 8c 0d |ION%="De|lete" ..|
|00002c00| 12 16 1d 20 20 20 e7 20 | 4d 45 4e 49 43 4f 4e 25 |... . |MENICON%|
|00002c10| 3c 53 43 4f 4e 28 41 46 | 4e 29 20 8c 0d 12 20 19 |<SCON(AF|N) ... .|
|00002c20| 20 20 20 20 c8 99 20 22 | 48 6f 75 72 67 6c 61 73 | .. "|Hourglas|
|00002c30| 73 5f 4f 6e 22 0d 12 2a | 22 20 20 20 20 e3 20 4e |s_On"..*|" . N|
|00002c40| 3d 4d 45 4e 49 43 4f 4e | 25 20 b8 20 53 43 4f 4e |=MENICON|% . SCON|
|00002c50| 28 41 46 4e 29 2d 31 0d | 12 34 28 20 20 20 20 20 |(AFN)-1.|.4( |
|00002c60| f2 73 65 74 5f 73 63 28 | 41 46 4e 2c 4e 2c a4 67 |.set_sc(|AFN,N,.g|
|00002c70| 65 74 5f 73 63 28 41 46 | 4e 2c 4e 2b 31 29 29 0d |et_sc(AF|N,N+1)).|
|00002c80| 12 3e 28 20 20 20 20 20 | 53 43 4b 45 59 43 25 28 |.>( |SCKEYC%(|
|00002c90| 41 46 4e 2c 4e 29 3d 53 | 43 4b 45 59 43 25 28 41 |AFN,N)=S|CKEYC%(A|
|00002ca0| 46 4e 2c 4e 2b 31 29 0d | 12 48 0b 20 20 20 20 ed |FN,N+1).|.H. .|
|00002cb0| 20 4e 0d 12 52 1a 20 20 | 20 20 c8 99 20 22 48 6f | N..R. | .. "Ho|
|00002cc0| 75 72 67 6c 61 73 73 5f | 4f 66 66 22 0d 12 5c 3b |urglass_|Off"..\;|
|00002cd0| 20 20 20 20 f2 73 65 74 | 5f 73 63 28 41 46 4e 2c | .set|_sc(AFN,|
|00002ce0| 53 43 4f 4e 28 41 46 4e | 29 2c 22 22 29 3a 53 43 |SCON(AFN|),""):SC|
|00002cf0| 4f 4e 28 41 46 4e 29 2d | 3d 31 3a f2 6f 70 65 6e |ON(AFN)-|=1:.open|
|00002d00| 5f 73 63 28 2d 32 29 0d | 12 66 08 20 20 20 cd 0d |_sc(-2).|.f. ..|
|00002d10| 12 70 07 20 20 cd 0d 12 | 7a 1b 20 20 e7 20 24 4f |.p. ...|z. . $O|
|00002d20| 50 54 49 4f 4e 25 3d 22 | 49 6e 73 65 72 74 22 20 |PTION%="|Insert" |
|00002d30| 8c 0d 12 84 1b 20 20 20 | e7 20 53 43 4f 4e 28 41 |..... |. SCON(A|
|00002d40| 46 4e 29 3c 44 53 43 4d | 41 58 20 8c 0d 12 8e 19 |FN)<DSCM|AX .....|
|00002d50| 20 20 20 20 c8 99 20 22 | 48 6f 75 72 67 6c 61 73 | .. "|Hourglas|
|00002d60| 73 5f 4f 6e 22 0d 12 98 | 24 20 20 20 20 e3 20 4e |s_On"...|$ . N|
|00002d70| 3d 53 43 4f 4e 28 41 46 | 4e 29 20 b8 20 4d 45 4e |=SCON(AF|N) . MEN|
|00002d80| 49 43 4f 4e 25 20 88 2d | 31 0d 12 a2 48 20 20 20 |ICON% .-|1...H |
|00002d90| 20 20 f2 73 65 74 5f 73 | 63 28 41 46 4e 2c 4e 2b | .set_s|c(AFN,N+|
|00002da0| 31 2c a4 67 65 74 5f 73 | 63 28 41 46 4e 2c 4e 29 |1,.get_s|c(AFN,N)|
|00002db0| 29 3a 53 43 4b 45 59 43 | 25 28 41 46 4e 2c 4e 2b |):SCKEYC|%(AFN,N+|
|00002dc0| 31 29 3d 53 43 4b 45 59 | 43 25 28 41 46 4e 2c 4e |1)=SCKEY|C%(AFN,N|
|00002dd0| 29 0d 12 ac 0b 20 20 20 | 20 ed 20 4e 0d 12 b6 1a |).... | . N....|
|00002de0| 20 20 20 20 c8 99 20 22 | 48 6f 75 72 67 6c 61 73 | .. "|Hourglas|
|00002df0| 73 5f 4f 66 66 22 0d 12 | c0 46 20 20 20 20 53 43 |s_Off"..|.F SC|
|00002e00| 4f 4e 28 41 46 4e 29 2b | 3d 31 3a f2 73 65 74 5f |ON(AFN)+|=1:.set_|
|00002e10| 73 63 28 41 46 4e 2c 4d | 45 4e 49 43 4f 4e 25 2c |sc(AFN,M|ENICON%,|
|00002e20| 22 22 29 3a 53 43 4b 45 | 59 43 25 28 41 46 4e 2c |""):SCKE|YC%(AFN,|
|00002e30| 4d 45 4e 49 43 4f 4e 25 | 29 3d 2d 31 0d 12 ca 14 |MENICON%|)=-1....|
|00002e40| 20 20 20 20 f2 6f 70 65 | 6e 5f 73 63 28 2d 32 29 | .ope|n_sc(-2)|
|00002e50| 0d 12 d4 08 20 20 20 cd | 0d 12 de 07 20 20 cd 0d |.... .|.... ..|
|00002e60| 12 e8 06 20 cd 0d 12 f2 | 1c 20 e7 20 24 4f 50 54 |... ....|. . $OPT|
|00002e70| 49 4f 4e 25 3d 22 45 64 | 69 74 20 2e 2e 2e 22 20 |ION%="Ed|it ..." |
|00002e80| 8c 0d 12 fc 13 20 20 f2 | 73 65 74 5f 65 64 61 70 |..... .|set_edap|
|00002e90| 70 28 30 29 0d 13 06 1d | 20 20 f2 6f 70 65 6e 28 |p(0)....| .open(|
|00002ea0| 65 64 69 74 5f 68 25 29 | 3a 45 44 46 4c 41 47 3d |edit_h%)|:EDFLAG=|
|00002eb0| b9 0d 13 10 06 20 cd 0d | 13 1a 21 20 e7 20 28 42 |..... ..|..! . (B|
|00002ec0| 54 25 20 80 20 31 29 20 | 80 20 43 4d 45 4e 55 25 |T% . 1) |. CMENU%|
|00002ed0| 3d 4d 45 4e 55 25 20 8c | 0d 13 24 2e 20 20 c8 99 |=MENU% .|..$. ..|
|00002ee0| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e | "Wimp_C|reateMen|
|00002ef0| 75 22 2c 2c 43 4d 45 4e | 55 25 2c 58 25 2b 31 36 |u",,CMEN|U%,X%+16|
|00002f00| 2c 59 25 2d 31 36 0d 13 | 2e 06 20 cd 0d 13 38 05 |,Y%-16..|.. ...8.|
|00002f10| e1 0d 13 42 04 0d 13 4c | 10 dd 20 f2 73 61 76 65 |...B...L|.. .save|
|00002f20| 5f 64 6f 63 6b 0d 13 56 | 08 20 ea 20 85 0d 13 60 |_dock..V|. . ...`|
|00002f30| 25 20 ee 20 85 20 ea 3a | f2 65 72 72 65 70 6f 72 |% . . .:|.errepor|
|00002f40| 74 28 f6 24 2b 22 28 22 | 2b c3 9e 2b 22 29 22 29 |t(.$+"("|+..+")")|
|00002f50| 3a e1 0d 13 6a 1c 20 53 | 3d ae 28 22 3c 44 6f 63 |:...j. S|=.("<Doc|
|00002f60| 6b 24 44 69 72 3e 2e 21 | 44 6f 63 6b 22 29 0d 13 |k$Dir>.!|Dock")..|
|00002f70| 74 2f 20 e7 20 53 3d 30 | 20 8c 20 f2 65 72 72 65 |t/ . S=0| . .erre|
|00002f80| 70 6f 72 74 28 22 55 6e | 61 62 6c 65 20 74 6f 20 |port("Un|able to |
|00002f90| 73 61 76 65 20 64 6f 63 | 6b 22 29 3a e1 0d 13 7e |save doc|k"):...~|
|00002fa0| 46 20 ee 20 85 20 ea 3a | f2 65 72 72 65 70 6f 72 |F . . .:|.errepor|
|00002fb0| 74 28 f6 24 2b 22 28 22 | 2b c3 9e 2b 22 29 22 29 |t(.$+"("|+..+")")|
|00002fc0| 3a d9 23 53 3a ff 28 22 | 52 45 4d 4f 56 45 20 3c |:.#S:.("|REMOVE <|
|00002fd0| 44 6f 63 6b 24 44 69 72 | 3e 2e 21 44 6f 63 6b 22 |Dock$Dir|>.!Dock"|
|00002fe0| 29 3a e1 0d 13 88 0f 20 | d5 23 53 2c 22 56 32 30 |):..... |.#S,"V20|
|00002ff0| 30 22 0d 13 92 0d 20 d5 | 23 53 2c c3 44 4f 4e 0d |0".... .|#S,.DON.|
|00003000| 13 9c 12 20 e3 20 4e 3d | 30 20 b8 20 44 4f 4e 2d |... . N=|0 . DON-|
|00003010| 31 0d 13 a6 33 20 20 d5 | 23 53 2c 50 24 28 4e 29 |1...3 .|#S,P$(N)|
|00003020| 3a d5 23 53 2c c3 4b 46 | 4c 41 47 28 4e 29 2b 22 |:.#S,.KF|LAG(N)+"|
|00003030| 20 22 2b c3 4b 4e 28 4e | 29 2b 22 20 22 2b c3 43 | "+.KN(N|)+" "+.C|
|00003040| 54 28 4e 29 0d 13 b0 08 | 20 ed 20 4e 0d 13 ba 08 |T(N)....| . N....|
|00003050| 20 d9 23 53 0d 13 c4 23 | 20 2a 53 45 54 54 59 50 | .#S...#| *SETTYP|
|00003060| 45 20 3c 44 6f 63 6b 24 | 44 69 72 3e 2e 21 44 6f |E <Dock$|Dir>.!Do|
|00003070| 63 6b 20 54 65 78 74 0d | 13 ce 05 e1 0d 13 d8 04 |ck Text.|........|
|00003080| 0d 13 e2 10 dd 20 f2 73 | 61 76 65 5f 64 65 66 73 |..... .s|ave_defs|
|00003090| 0d 13 ec 08 20 ea 20 85 | 0d 13 f6 25 20 ee 20 85 |.... . .|...% . .|
|000030a0| 20 ea 3a f2 65 72 72 65 | 70 6f 72 74 28 f6 24 2b | .:.erre|port(.$+|
|000030b0| 22 28 22 2b c3 9e 2b 22 | 29 22 29 3a e1 0d 14 00 |"("+..+"|)"):....|
|000030c0| 21 20 53 3d ae 28 22 3c | 44 6f 63 6b 24 44 69 72 |! S=.("<|Dock$Dir|
|000030d0| 3e 2e 21 53 68 6f 72 74 | 43 75 74 73 22 29 0d 14 |>.!Short|Cuts")..|
|000030e0| 0a 34 20 e7 20 53 3d 30 | 20 8c 20 f2 65 72 72 65 |.4 . S=0| . .erre|
|000030f0| 70 6f 72 74 28 22 55 6e | 61 62 6c 65 20 74 6f 20 |port("Un|able to |
|00003100| 73 61 76 65 20 73 68 6f | 72 74 63 75 74 73 22 29 |save sho|rtcuts")|
|00003110| 3a e1 0d 14 14 4b 20 ee | 20 85 20 ea 3a f2 65 72 |:....K .| . .:.er|
|00003120| 72 65 70 6f 72 74 28 f6 | 24 2b 22 28 22 2b c3 9e |report(.|$+"("+..|
|00003130| 2b 22 29 22 29 3a d9 23 | 53 3a ff 28 22 52 45 4d |+")"):.#|S:.("REM|
|00003140| 4f 56 45 20 3c 44 6f 63 | 6b 24 44 69 72 3e 2e 21 |OVE <Doc|k$Dir>.!|
|00003150| 53 68 6f 72 74 43 75 74 | 73 22 29 3a e1 0d 14 1e |ShortCut|s"):....|
|00003160| 0f 20 d5 23 53 2c 22 56 | 32 30 30 22 0d 14 28 20 |. .#S,"V|200"..( |
|00003170| 20 d5 23 53 2c bd 28 34 | 38 2b 44 50 4f 53 29 2b | .#S,.(4|8+DPOS)+|
|00003180| bd 28 34 38 2b 53 43 50 | 4f 53 29 3b 0d 14 32 17 |.(48+SCP|OS);..2.|
|00003190| 20 d5 23 53 2c bd 28 34 | 38 29 2b bd 28 34 38 2d | .#S,.(4|8)+.(48-|
|000031a0| 53 43 29 0d 14 3c 10 20 | d5 23 53 2c c3 41 50 50 |SC)..<. |.#S,.APP|
|000031b0| 4e 55 4d 0d 14 46 11 20 | e7 20 41 50 50 4e 55 4d |NUM..F. |. APPNUM|
|000031c0| 3e 30 20 8c 0d 14 50 16 | 20 20 e3 20 4e 3d 30 20 |>0 ...P.| . N=0 |
|000031d0| b8 20 41 50 50 4e 55 4d | 2d 31 0d 14 5a 12 20 20 |. APPNUM|-1..Z. |
|000031e0| 20 d5 23 53 2c 41 50 50 | 24 28 4e 29 0d 14 64 13 | .#S,APP|$(N)..d.|
|000031f0| 20 20 20 d5 23 53 2c c3 | 53 43 4f 4e 28 4e 29 0d | .#S,.|SCON(N).|
|00003200| 14 6e 14 20 20 20 e7 20 | 53 43 4f 4e 28 4e 29 3e |.n. . |SCON(N)>|
|00003210| 30 20 8c 0d 14 78 19 20 | 20 20 20 e3 20 4d 3d 30 |0 ...x. | . M=0|
|00003220| 20 b8 20 53 43 4f 4e 28 | 4e 29 2d 31 0d 14 82 2b | . SCON(|N)-1...+|
|00003230| 20 20 20 20 20 d5 23 53 | 2c a4 67 65 74 5f 73 63 | .#S|,.get_sc|
|00003240| 28 4e 2c 4d 29 3a d5 23 | 53 2c c3 53 43 4b 45 59 |(N,M):.#|S,.SCKEY|
|00003250| 43 25 28 4e 2c 4d 29 0d | 14 8c 0b 20 20 20 20 ed |C%(N,M).|... .|
|00003260| 20 4d 0d 14 96 08 20 20 | 20 cd 0d 14 a0 09 20 20 | M.... | ..... |
|00003270| ed 20 4e 0d 14 aa 06 20 | cd 0d 14 b4 08 20 d9 23 |. N.... |..... .#|
|00003280| 53 0d 14 be 28 20 2a 53 | 45 54 54 59 50 45 20 3c |S...( *S|ETTYPE <|
|00003290| 44 6f 63 6b 24 44 69 72 | 3e 2e 21 53 68 6f 72 74 |Dock$Dir|>.!Short|
|000032a0| 43 75 74 73 20 54 65 78 | 74 0d 14 c8 05 e1 0d 14 |Cuts Tex|t.......|
|000032b0| d2 04 0d 14 dc 13 dd 20 | f2 73 65 74 5f 65 64 61 |....... |.set_eda|
|000032c0| 70 70 28 4e 29 0d 14 e6 | 18 20 e7 20 4e 3e 3d 41 |pp(N)...|. . N>=A|
|000032d0| 50 50 4e 55 4d 20 84 20 | 4e 3c 30 20 8c 0d 14 f0 |PPNUM . |N<0 ....|
|000032e0| 42 20 20 24 65 64 69 74 | 69 31 30 3d 22 28 6e 6f |B $edit|i10="(no|
|000032f0| 6e 65 29 22 3a 24 64 65 | 66 61 70 70 69 30 3d 22 |ne)":$de|fappi0="|
|00003300| 28 6e 6f 20 69 6e 70 75 | 74 20 66 6f 63 75 73 29 |(no inpu|t focus)|
|00003310| 22 3a 41 46 3d a3 3a 45 | 44 41 50 50 3d 2d 31 0d |":AF=.:E|DAPP=-1.|
|00003320| 14 fa 06 20 cc 0d 15 04 | 1e 20 20 24 65 64 69 74 |... ....|. $edit|
|00003330| 69 31 30 3d 41 50 50 24 | 28 4e 29 3a 45 44 41 50 |i10=APP$|(N):EDAP|
|00003340| 50 3d 4e 0d 15 0e 14 20 | 20 41 46 4e 3d 45 44 41 |P=N.... | AFN=EDA|
|00003350| 50 50 3a 41 46 3d b9 0d | 15 18 10 20 20 24 65 64 |PP:AF=..|... $ed|
|00003360| 69 74 69 39 3d 22 22 0d | 15 22 21 20 20 24 64 65 |iti9="".|."! $de|
|00003370| 66 61 70 70 69 30 3d 41 | 50 50 24 28 4e 29 2b 22 |fappi0=A|PP$(N)+"|
|00003380| 20 28 65 64 69 74 29 22 | 0d 15 2c 06 20 cd 0d 15 | (edit)"|..,. ...|
|00003390| 36 11 20 f2 6f 70 65 6e | 5f 73 63 28 2d 32 29 0d |6. .open|_sc(-2).|
|000033a0| 15 40 1e 20 f2 72 65 64 | 72 61 77 5f 69 63 6f 6e |.@. .red|raw_icon|
|000033b0| 28 64 65 66 61 70 70 5f | 68 25 2c 30 29 0d 15 4a |(defapp_|h%,0)..J|
|000033c0| 1c 20 f2 72 65 64 72 61 | 77 5f 69 63 6f 6e 28 65 |. .redra|w_icon(e|
|000033d0| 64 69 74 5f 68 25 2c 39 | 29 0d 15 54 1d 20 f2 72 |dit_h%,9|)..T. .r|
|000033e0| 65 64 72 61 77 5f 69 63 | 6f 6e 28 65 64 69 74 5f |edraw_ic|on(edit_|
|000033f0| 68 25 2c 31 30 29 0d 15 | 5e 05 e1 0d 15 68 04 0d |h%,10)..|^....h..|
|00003400| 15 72 10 dd 20 f2 70 5f | 73 65 6c 28 41 24 29 0d |.r.. .p_|sel(A$).|
|00003410| 15 7c 17 20 e7 20 c0 41 | 24 2c 35 29 3d 22 44 6f |.|. . .A|$,5)="Do|
|00003420| 63 6b 2e 22 20 8c 0d 15 | 86 1e 20 20 e7 20 c1 41 |ck." ...|.. . .A|
|00003430| 24 2c 36 29 3d 22 4c 65 | 66 74 22 20 8c 20 44 50 |$,6)="Le|ft" . DP|
|00003440| 4f 53 3d 30 0d 15 90 1f | 20 20 e7 20 c1 41 24 2c |OS=0....| . .A$,|
|00003450| 36 29 3d 22 52 69 67 68 | 74 22 20 8c 20 44 50 4f |6)="Righ|t" . DPO|
|00003460| 53 3d 31 0d 15 9a 0d 20 | 20 f2 64 5f 74 69 63 6b |S=1.... | .d_tick|
|00003470| 0d 15 a4 13 20 20 f2 6f | 70 65 6e 5f 61 6c 6c 28 |.... .o|pen_all(|
|00003480| 2d 32 29 0d 15 ae 06 20 | cd 0d 15 b8 1d 20 e7 20 |-2).... |..... . |
|00003490| c0 41 24 2c 31 30 29 3d | 22 53 68 6f 72 74 43 75 |.A$,10)=|"ShortCu|
|000034a0| 74 73 2e 22 20 8c 0d 15 | c2 1d 20 20 e7 20 c1 41 |ts." ...|.. . .A|
|000034b0| 24 2c 31 31 29 3d 22 4f | 6e 20 20 22 20 8c 20 53 |$,11)="O|n " . S|
|000034c0| 43 3d b9 0d 15 cc 1d 20 | 20 e7 20 c1 41 24 2c 31 |C=..... | . .A$,1|
|000034d0| 31 29 3d 22 4f 66 66 20 | 22 20 8c 20 53 43 3d a3 |1)="Off |" . SC=.|
|000034e0| 0d 15 d6 0e 20 20 f2 73 | 63 5f 74 69 63 6b 0d 15 |.... .s|c_tick..|
|000034f0| e0 13 20 20 f2 6f 70 65 | 6e 5f 61 6c 6c 28 2d 32 |.. .ope|n_all(-2|
|00003500| 29 0d 15 ea 06 20 cd 0d | 15 f4 05 e1 0d 15 fe 04 |).... ..|........|
|00003510| 0d 16 08 0d dd 20 f2 64 | 5f 74 69 63 6b 0d 16 12 |..... .d|_tick...|
|00003520| 0e 20 f2 64 5f 75 6e 74 | 69 63 6b 0d 16 1c 27 20 |. .d_unt|ick...' |
|00003530| e7 20 44 50 4f 53 3d 30 | 20 8c 20 f2 73 65 74 28 |. DPOS=0| . .set(|
|00003540| 22 4c 65 66 74 22 2c 44 | 4d 45 4e 55 25 2c 30 2c |"Left",D|MENU%,0,|
|00003550| 30 29 0d 16 26 27 20 e7 | 20 44 50 4f 53 3d 31 20 |0)..&' .| DPOS=1 |
|00003560| 8c 20 f2 73 65 74 28 22 | 52 69 67 68 22 2c 44 4d |. .set("|Righ",DM|
|00003570| 45 4e 55 25 2c 30 2c 30 | 29 0d 16 30 05 e1 0d 16 |ENU%,0,0|)..0....|
|00003580| 3a 04 0d 16 44 0f dd 20 | f2 64 5f 75 6e 74 69 63 |:...D.. |.d_untic|
|00003590| 6b 0d 16 4e 38 20 f2 72 | 65 73 65 74 28 22 4c 65 |k..N8 .r|eset("Le|
|000035a0| 66 74 22 2c 44 4d 45 4e | 55 25 2c 30 2c 30 29 3a |ft",DMEN|U%,0,0):|
|000035b0| f2 72 65 73 65 74 28 22 | 52 69 67 68 22 2c 44 4d |.reset("|Righ",DM|
|000035c0| 45 4e 55 25 2c 30 2c 30 | 29 0d 16 58 05 e1 0d 16 |ENU%,0,0|)..X....|
|000035d0| 62 04 0d 16 6c 0e dd 20 | f2 73 63 5f 74 69 63 6b |b...l.. |.sc_tick|
|000035e0| 0d 16 76 0f 20 f2 73 63 | 5f 75 6e 74 69 63 6b 0d |..v. .sc|_untick.|
|000035f0| 16 80 0d 20 e7 20 ac 20 | 53 43 20 8c 0d 16 8a 1e |... . . |SC .....|
|00003600| 20 20 f2 73 65 74 28 22 | 4f 66 66 20 22 2c 53 43 | .set("|Off ",SC|
|00003610| 4d 45 4e 55 25 2c 30 2c | 30 29 0d 16 94 06 20 cc |MENU%,0,|0).... .|
|00003620| 0d 16 9e 1e 20 20 f2 73 | 65 74 28 22 4f 6e 20 20 |.... .s|et("On |
|00003630| 22 2c 53 43 4d 45 4e 55 | 25 2c 30 2c 30 29 0d 16 |",SCMENU|%,0,0)..|
|00003640| a8 06 20 cd 0d 16 b2 05 | e1 0d 16 bc 04 0d 16 c6 |.. .....|........|
|00003650| 10 dd 20 f2 73 63 5f 75 | 6e 74 69 63 6b 0d 16 d0 |.. .sc_u|ntick...|
|00003660| 1f 20 f2 72 65 73 65 74 | 28 22 4f 6e 20 20 22 2c |. .reset|("On ",|
|00003670| 53 43 4d 45 4e 55 25 2c | 30 2c 30 29 0d 16 da 1f |SCMENU%,|0,0)....|
|00003680| 20 f2 72 65 73 65 74 28 | 22 4f 66 66 20 22 2c 53 | .reset(|"Off ",S|
|00003690| 43 4d 45 4e 55 25 2c 30 | 2c 30 29 0d 16 e4 05 e1 |CMENU%,0|,0).....|
|000036a0| 0d 16 ee 04 0d 16 f8 0e | dd 20 f2 72 65 63 65 69 |........|. .recei|
|000036b0| 76 65 0d 17 02 23 20 52 | 45 46 25 3d 42 55 46 46 |ve...# R|EF%=BUFF|
|000036c0| 45 52 25 21 38 3a 54 41 | 53 4b 25 3d 42 55 46 46 |ER%!8:TA|SK%=BUFF|
|000036d0| 45 52 25 21 34 0d 17 0c | 14 20 c8 8e 20 42 55 46 |ER%!4...|. .. BUF|
|000036e0| 46 45 52 25 21 31 36 20 | ca 0d 17 16 08 20 c9 20 |FER%!16 |..... . |
|000036f0| 30 0d 17 20 0f 20 20 f2 | 66 69 6e 69 73 68 3a e0 |0.. . .|finish:.|
|00003700| 0d 17 2a 0d 20 c9 20 26 | 34 30 30 43 31 0d 17 34 |..*. . &|400C1..4|
|00003710| 12 20 20 f2 72 65 61 64 | 76 64 75 69 6e 66 6f 0d |. .read|vduinfo.|
|00003720| 17 3e 16 20 20 52 45 4f | 50 45 4e 3d b9 3a 4d 41 |.>. REO|PEN=.:MA|
|00003730| 53 4b 25 3d 30 0d 17 48 | 08 20 c9 20 31 0d 17 52 |SK%=0..H|. . 1..R|
|00003740| 08 20 c9 20 33 0d 17 5c | 1c 20 20 e7 20 42 55 46 |. . 3..\|. . BUF|
|00003750| 46 45 52 25 21 32 30 3d | 64 6f 63 6b 5f 68 25 20 |FER%!20=|dock_h% |
|00003760| 8c 0d 17 66 21 20 20 20 | 46 24 3d a4 67 65 74 5f |...f! |F$=.get_|
|00003770| 73 74 72 69 6e 67 28 42 | 55 46 46 45 52 25 2b 34 |string(B|UFFER%+4|
|00003780| 34 29 0d 17 70 1e 20 20 | 20 c8 99 20 22 4f 53 5f |4)..p. | .. "OS_|
|00003790| 46 69 6c 65 22 2c 31 37 | 2c 46 24 20 b8 20 54 59 |File",17|,F$ . TY|
|000037a0| 0d 17 7a 1f 20 20 20 46 | 45 4c 44 25 3d 42 55 46 |..z. F|ELD%=BUF|
|000037b0| 46 45 52 25 21 32 34 20 | 81 20 32 2b 44 4f 46 0d |FER%!24 |. 2+DOF.|
|000037c0| 17 84 1d 20 20 20 e7 20 | 42 55 46 46 45 52 25 21 |... . |BUFFER%!|
|000037d0| 32 34 3c 30 20 8c 20 ef | 20 37 3a e1 0d 17 8e 1a |24<0 . .| 7:.....|
|000037e0| 20 20 20 e7 20 46 45 4c | 44 25 3e 4d 41 58 20 8c | . FEL|D%>MAX .|
|000037f0| 20 ef 20 37 3a e1 0d 17 | 98 22 20 20 20 e7 20 54 | . 7:...|." . T|
|00003800| 59 3c 3e 32 20 80 20 54 | 59 3c 3e 31 20 80 20 54 |Y<>2 . T|Y<>1 . T|
|00003810| 59 3c 3e 33 20 8c 20 e1 | 0d 17 a2 0e 20 20 20 c8 |Y<>3 . .|.... .|
|00003820| 8e 20 54 59 20 ca 0d 17 | ac 0b 20 20 20 c9 20 31 |. TY ...|.. . 1|
|00003830| 3a 0d 17 b6 24 20 20 20 | 20 e7 20 c0 a4 6c 65 61 |:...$ | . ..lea|
|00003840| 66 28 50 24 28 46 45 4c | 44 25 29 29 2c 31 29 3d |f(P$(FEL|D%)),1)=|
|00003850| 22 21 22 20 8c 0d 17 c0 | 37 20 20 20 20 20 c8 99 |"!" ....|7 ..|
|00003860| 20 22 57 69 6d 70 5f 53 | 74 61 72 74 54 61 73 6b | "Wimp_S|tartTask|
|00003870| 22 2c 22 52 75 6e 20 22 | 2b 50 24 28 46 45 4c 44 |","Run "|+P$(FELD|
|00003880| 25 29 2b 22 20 22 2b 46 | 24 2b bd 30 0d 17 ca 09 |%)+" "+F|$+.0....|
|00003890| 20 20 20 20 cd 0d 17 d4 | 0b 20 20 20 c9 20 32 3a | ....|. . 2:|
|000038a0| 0d 17 de 22 20 20 20 20 | e7 20 46 45 4c 44 25 3e |..." |. FELD%>|
|000038b0| 3d 44 4f 4e 20 8c 20 44 | 4f 4e 3d 46 45 4c 44 25 |=DON . D|ON=FELD%|
|000038c0| 2b 31 0d 17 e8 23 20 20 | 20 20 50 24 28 46 45 4c |+1...# | P$(FEL|
|000038d0| 44 25 29 3d 46 24 3a f2 | 6f 70 65 6e 5f 64 6f 63 |D%)=F$:.|open_doc|
|000038e0| 6b 28 2d 32 29 0d 17 f2 | 0b 20 20 20 c9 20 33 3a |k(-2)...|. . 3:|
|000038f0| 0d 17 fc 15 20 20 20 20 | e7 20 4f 53 5f 56 3e 3d |.... |. OS_V>=|
|00003900| 33 30 30 20 8c 0d 18 06 | 23 20 20 20 20 20 e7 20 |300 ....|# . |
|00003910| 46 45 4c 44 25 3e 3d 44 | 4f 4e 20 8c 20 44 4f 4e |FELD%>=D|ON . DON|
|00003920| 3d 46 45 4c 44 25 2b 31 | 0d 18 10 23 20 20 20 20 |=FELD%+1|...# |
|00003930| 50 24 28 46 45 4c 44 25 | 29 3d 46 24 3a f2 6f 70 |P$(FELD%|)=F$:.op|
|00003940| 65 6e 5f 64 6f 63 6b 28 | 2d 32 29 0d 18 1a 09 20 |en_dock(|-2).... |
|00003950| 20 20 20 cc 0d 18 24 5c | 20 20 20 20 20 f2 65 72 | ...$\| .er|
|00003960| 72 65 70 6f 72 74 28 22 | 49 20 63 61 6e 6e 6f 74 |report("|I cannot|
|00003970| 20 61 63 63 65 70 74 20 | 69 6d 61 67 65 20 66 69 | accept |image fi|
|00003980| 6c 65 73 20 75 6e 6c 65 | 73 73 20 52 49 53 43 20 |les unle|ss RISC |
|00003990| 4f 53 20 33 20 28 6f 72 | 20 67 72 65 61 74 65 72 |OS 3 (or| greater|
|000039a0| 29 20 69 73 20 72 75 6e | 6e 69 6e 67 20 21 22 29 |) is run|ning !")|
|000039b0| 0d 18 2e 09 20 20 20 20 | cd 0d 18 38 08 20 20 20 |.... |...8. |
|000039c0| cb 0d 18 42 07 20 20 cd | 0d 18 4c 0b 20 c9 20 26 |...B. .|..L. . &|
|000039d0| 35 30 32 0d 18 56 11 20 | 20 f2 68 65 6c 70 28 52 |502..V. | .help(R|
|000039e0| 45 46 25 29 0d 18 60 0d | 20 c9 20 26 34 30 30 43 |EF%)..`.| . &400C|
|000039f0| 37 0d 18 6a 12 20 20 e7 | 20 ac 20 45 44 46 4c 41 |7..j. .| . EDFLA|
|00003a00| 47 20 8c 0d 18 74 22 20 | 20 20 4e 4d 24 3d a4 67 |G ...t" | NM$=.g|
|00003a10| 65 74 5f 73 74 72 69 6e | 67 28 42 55 46 46 45 52 |et_strin|g(BUFFER|
|00003a20| 25 2b 32 38 29 0d 18 7e | 19 20 20 20 f2 74 65 73 |%+28)..~|. .tes|
|00003a30| 74 5f 61 70 70 6e 61 6d | 65 28 4e 4d 24 29 0d 18 |t_appnam|e(NM$)..|
|00003a40| 88 07 20 20 cd 0d 18 92 | 06 20 cb 0d 18 9c 05 e1 |.. ....|. ......|
|00003a50| 0d 18 a6 04 0d 18 b0 18 | dd 20 f2 74 65 73 74 5f |........|. .test_|
|00003a60| 61 70 70 6e 61 6d 65 28 | 41 41 24 29 0d 18 ba 10 |appname(|AA$)....|
|00003a70| 20 50 3d 30 3a 46 4f 55 | 4e 44 3d a3 0d 18 c4 1a | P=0:FOU|ND=.....|
|00003a80| 20 c8 95 20 50 3c 41 50 | 50 4e 55 4d 20 80 20 ac | .. P<AP|PNUM . .|
|00003a90| 20 46 4f 55 4e 44 0d 18 | ce 24 20 20 e7 20 41 50 | FOUND..|.$ . AP|
|00003aa0| 50 24 28 50 29 3d 41 41 | 24 20 8c 20 46 4f 55 4e |P$(P)=AA|$ . FOUN|
|00003ab0| 44 3d b9 20 8b 20 50 2b | 3d 31 0d 18 d8 06 20 ce |D=. . P+|=1.... .|
|00003ac0| 0d 18 e2 0e 20 e7 20 46 | 4f 55 4e 44 20 8c 0d 18 |.... . F|OUND ...|
|00003ad0| ec 31 20 20 41 41 24 2b | 3d 22 20 2a 22 3a 41 46 |.1 AA$+|=" *":AF|
|00003ae0| 3d b9 3a 41 46 4e 3d 50 | 3a f2 73 65 74 5f 66 69 |=.:AFN=P|:.set_fi|
|00003af0| 65 6c 64 73 3a f2 72 65 | 64 72 61 77 5f 73 63 0d |elds:.re|draw_sc.|
|00003b00| 18 f6 06 20 cc 0d 19 00 | 14 20 20 f2 63 6c 65 61 |... ....|. .clea|
|00003b10| 72 5f 73 63 3a 41 46 3d | a3 0d 19 0a 06 20 cd 0d |r_sc:AF=|..... ..|
|00003b20| 19 14 2c 20 24 64 65 66 | 61 70 70 69 30 3d 41 41 |.., $def|appi0=AA|
|00003b30| 24 3a f2 72 65 64 72 61 | 77 5f 69 63 6f 6e 28 64 |$:.redra|w_icon(d|
|00003b40| 65 66 61 70 70 5f 68 25 | 2c 30 29 0d 19 1e 05 e1 |efapp_h%|,0).....|
|00003b50| 0d 19 28 04 0d 19 32 0f | dd 20 f2 63 6c 65 61 72 |..(...2.|. .clear|
|00003b60| 5f 73 63 0d 19 3c 11 20 | e3 20 4e 3d 30 20 b8 20 |_sc..<. |. N=0 . |
|00003b70| 4e 4f 53 43 0d 19 46 15 | 20 20 24 28 73 63 74 25 |NOSC..F.| $(sct%|
|00003b80| 2b 31 36 2a 4e 29 3d 22 | 22 0d 19 50 1f 20 20 f2 |+16*N)="|"..P. .|
|00003b90| 72 65 64 72 61 77 5f 69 | 63 6f 6e 28 64 65 66 63 |redraw_i|con(defc|
|00003ba0| 75 74 5f 68 25 2c 4e 29 | 0d 19 5a 08 20 ed 20 4e |ut_h%,N)|..Z. . N|
|00003bb0| 0d 19 64 05 e1 0d 19 6e | 04 0d 19 78 10 dd 20 f2 |..d....n|...x.. .|
|00003bc0| 72 65 64 72 61 77 5f 73 | 63 0d 19 82 11 20 e3 20 |redraw_s|c.... . |
|00003bd0| 4e 3d 30 20 b8 20 4e 4f | 53 43 0d 19 8c 1f 20 20 |N=0 . NO|SC.... |
|00003be0| f2 72 65 64 72 61 77 5f | 69 63 6f 6e 28 64 65 66 |.redraw_|icon(def|
|00003bf0| 63 75 74 5f 68 25 2c 4e | 29 0d 19 96 08 20 ed 20 |cut_h%,N|).... . |
|00003c00| 4e 0d 19 a0 05 e1 0d 19 | aa 04 0d 19 b4 21 dd 20 |N.......|.....!. |
|00003c10| f2 72 65 64 72 61 77 5f | 69 63 6f 6e 28 48 41 4e |.redraw_|icon(HAN|
|00003c20| 44 4c 45 25 2c 49 43 4f | 4e 25 29 0d 19 be 3e 20 |DLE%,ICO|N%)...> |
|00003c30| 21 42 55 46 46 45 52 25 | 3d 48 41 4e 44 4c 45 25 |!BUFFER%|=HANDLE%|
|00003c40| 3a 42 55 46 46 45 52 25 | 21 34 3d 49 43 4f 4e 25 |:BUFFER%|!4=ICON%|
|00003c50| 3a 42 55 46 46 45 52 25 | 21 38 3d 30 3a 42 55 46 |:BUFFER%|!8=0:BUF|
|00003c60| 46 45 52 25 21 31 32 3d | 30 0d 19 c8 24 20 c8 99 |FER%!12=|0...$ ..|
|00003c70| 20 22 57 69 6d 70 5f 53 | 65 74 49 63 6f 6e 53 74 | "Wimp_S|etIconSt|
|00003c80| 61 74 65 22 2c 2c 42 55 | 46 46 45 52 25 0d 19 d2 |ate",,BU|FFER%...|
|00003c90| 05 e1 0d 19 dc 04 0d 19 | e6 2c dd 20 f2 73 65 74 |........|.,. .set|
|00003ca0| 5f 69 63 6f 6e 5f 73 74 | 61 74 65 28 48 41 4e 44 |_icon_st|ate(HAND|
|00003cb0| 4c 45 25 2c 49 43 4f 4e | 25 2c 50 31 25 2c 50 32 |LE%,ICON|%,P1%,P2|
|00003cc0| 25 29 0d 19 f0 42 20 21 | 42 55 46 46 45 52 25 3d |%)...B !|BUFFER%=|
|00003cd0| 48 41 4e 44 4c 45 25 3a | 42 55 46 46 45 52 25 21 |HANDLE%:|BUFFER%!|
|00003ce0| 34 3d 49 43 4f 4e 25 3a | 42 55 46 46 45 52 25 21 |4=ICON%:|BUFFER%!|
|00003cf0| 38 3d 50 31 25 3a 42 55 | 46 46 45 52 25 21 31 32 |8=P1%:BU|FFER%!12|
|00003d00| 3d 50 32 25 0d 19 fa 24 | 20 c8 99 20 22 57 69 6d |=P2%...$| .. "Wim|
|00003d10| 70 5f 53 65 74 49 63 6f | 6e 53 74 61 74 65 22 2c |p_SetIco|nState",|
|00003d20| 2c 42 55 46 46 45 52 25 | 0d 1a 04 05 e1 0d 1a 0e |,BUFFER%|........|
|00003d30| 04 0d 1a 18 11 dd 20 f2 | 68 65 6c 70 28 52 45 46 |...... .|help(REF|
|00003d40| 25 29 0d 1a 22 08 ea 20 | 54 24 0d 1a 2c 17 20 48 |%)..".. |T$..,. H|
|00003d50| 41 4e 44 4c 45 25 3d 42 | 55 46 46 45 52 25 21 33 |ANDLE%=B|UFFER%!3|
|00003d60| 32 0d 1a 36 0a 20 54 24 | 3d 22 22 0d 1a 40 0f 20 |2..6. T$|=""..@. |
|00003d70| e7 20 54 24 3c 3e 22 22 | 20 8c 0d 1a 4a 45 20 20 |. T$<>""| ...JE |
|00003d80| 42 55 46 46 45 52 25 21 | 31 36 3d 26 35 30 33 3a |BUFFER%!|16=&503:|
|00003d90| 42 55 46 46 45 52 25 21 | 31 32 3d 52 45 46 25 3a |BUFFER%!|12=REF%:|
|00003da0| 21 42 55 46 46 45 52 25 | 3d 32 30 2d 34 2a a8 28 |!BUFFER%|=20-4*.(|
|00003db0| 28 2d a9 28 54 24 29 2b | 31 29 2f 34 29 2b 34 0d |(-.(T$)+|1)/4)+4.|
|00003dc0| 1a 54 19 20 20 24 28 42 | 55 46 46 45 52 25 2b 32 |.T. $(B|UFFER%+2|
|00003dd0| 30 29 3d 54 24 2b bd 30 | 0d 1a 5e 2c 20 20 c8 99 |0)=T$+.0|..^, ..|
|00003de0| 20 22 57 69 6d 70 5f 53 | 65 6e 64 4d 65 73 73 61 | "Wimp_S|endMessa|
|00003df0| 67 65 22 2c 31 37 2c 42 | 55 46 46 45 52 25 2c 54 |ge",17,B|UFFER%,T|
|00003e00| 41 53 4b 25 0d 1a 68 06 | 20 cd 0d 1a 72 05 e1 0d |ASK%..h.| ...r...|
|00003e10| 1a 7c 04 0d 1a 86 14 dd | 20 f2 6f 70 65 6e 5f 61 |.|......| .open_a|
|00003e20| 6c 6c 28 42 46 25 29 0d | 1a 90 14 20 f2 6f 70 65 |ll(BF%).|... .ope|
|00003e30| 6e 5f 64 6f 63 6b 28 42 | 46 25 29 0d 1a 9a 12 20 |n_dock(B|F%).... |
|00003e40| f2 6f 70 65 6e 5f 73 63 | 28 42 46 25 29 0d 1a a4 |.open_sc|(BF%)...|
|00003e50| 05 e1 0d 1a ae 04 0d 1a | b8 15 dd 20 f2 6f 70 65 |........|... .ope|
|00003e60| 6e 5f 64 6f 63 6b 28 42 | 46 25 29 0d 1a c2 15 ea |n_dock(B|F%).....|
|00003e70| 20 58 30 2c 58 31 2c 59 | 30 2c 59 31 2c 55 53 25 | X0,X1,Y|0,Y1,US%|
|00003e80| 0d 1a cc 0f 20 e7 20 44 | 50 4f 53 3d 30 20 8c 0d |.... . D|POS=0 ..|
|00003e90| 1a d6 10 20 20 58 30 3d | 30 3a 58 31 3d 39 32 0d |... X0=|0:X1=92.|
|00003ea0| 1a e0 06 20 cc 0d 1a ea | 18 20 20 58 30 3d 4f 53 |... ....|. X0=OS|
|00003eb0| 58 2d 39 36 3a 58 31 3d | 4f 53 58 2d 34 0d 1a f4 |X-96:X1=|OSX-4...|
|00003ec0| 06 20 cd 0d 1a fe 0b 20 | 59 31 3d 4f 53 59 0d 1b |. ..... |Y1=OSY..|
|00003ed0| 08 0e 20 e7 20 44 4f 46 | 3e 30 20 8c 0d 1b 12 32 |.. . DOF|>0 ....2|
|00003ee0| 20 20 21 42 55 46 46 45 | 52 25 3d 75 70 5f 68 25 | !BUFFE|R%=up_h%|
|00003ef0| 3a 42 55 46 46 45 52 25 | 21 34 3d 58 30 3a 42 55 |:BUFFER%|!4=X0:BU|
|00003f00| 46 46 45 52 25 21 38 3d | 4f 53 59 2d 39 32 0d 1b |FFER%!8=|OSY-92..|
|00003f10| 1c 4b 20 20 42 55 46 46 | 45 52 25 21 31 32 3d 58 |.K BUFF|ER%!12=X|
|00003f20| 31 3a 42 55 46 46 45 52 | 25 21 31 36 3d 4f 53 59 |1:BUFFER|%!16=OSY|
|00003f30| 3a 42 55 46 46 45 52 25 | 21 32 30 3d 30 3a 42 55 |:BUFFER%|!20=0:BU|
|00003f40| 46 46 45 52 25 21 32 34 | 3d 30 3a 42 55 46 46 45 |FFER%!24|=0:BUFFE|
|00003f50| 52 25 21 32 38 3d 42 46 | 25 0d 1b 26 23 20 20 c8 |R%!28=BF|%..&# .|
|00003f60| 99 20 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |. "Wimp_|OpenWind|
|00003f70| 6f 77 22 2c 2c 42 55 46 | 46 45 52 25 0d 1b 30 0e |ow",,BUF|FER%..0.|
|00003f80| 20 20 59 31 3d 59 31 2d | 39 36 0d 1b 3a 06 20 cc | Y1=Y1-|96..:. .|
|00003f90| 0d 1b 44 13 20 20 f2 63 | 6c 6f 73 65 28 75 70 5f |..D. .c|lose(up_|
|00003fa0| 68 25 29 0d 1b 4e 06 20 | cd 0d 1b 58 18 20 4e 4f |h%)..N. |...X. NO|
|00003fb0| 44 3d 28 59 31 2d 31 31 | 36 29 20 81 20 39 36 2d |D=(Y1-11|6) . 96-|
|00003fc0| 31 0d 1b 62 3c 20 21 42 | 55 46 46 45 52 25 3d 64 |1..b< !B|UFFER%=d|
|00003fd0| 6f 77 6e 5f 68 25 3a 42 | 55 46 46 45 52 25 21 34 |own_h%:B|UFFER%!4|
|00003fe0| 3d 58 30 3a 42 55 46 46 | 45 52 25 21 38 3d 59 31 |=X0:BUFF|ER%!8=Y1|
|00003ff0| 2d 39 36 2a 28 4e 4f 44 | 2b 31 29 2b 34 0d 1b 6c |-96*(NOD|+1)+4..l|
|00004000| 57 20 42 55 46 46 45 52 | 25 21 31 32 3d 58 31 3a |W BUFFER|%!12=X1:|
|00004010| 42 55 46 46 45 52 25 21 | 31 36 3d 59 31 2d 39 36 |BUFFER%!|16=Y1-96|
|00004020| 2a 28 4e 4f 44 2b 31 29 | 2b 39 36 3a 42 55 46 46 |*(NOD+1)|+96:BUFF|
|00004030| 45 52 25 21 32 30 3d 30 | 3a 42 55 46 46 45 52 25 |ER%!20=0|:BUFFER%|
|00004040| 21 32 34 3d 30 3a 42 55 | 46 46 45 52 25 21 32 38 |!24=0:BU|FFER%!28|
|00004050| 3d 42 46 25 0d 1b 76 22 | 20 c8 99 20 22 57 69 6d |=BF%..v"| .. "Wim|
|00004060| 70 5f 4f 70 65 6e 57 69 | 6e 64 6f 77 22 2c 2c 42 |p_OpenWi|ndow",,B|
|00004070| 55 46 46 45 52 25 0d 1b | 80 11 20 59 30 3d 59 31 |UFFER%..|.. Y0=Y1|
|00004080| 2d 4e 4f 44 2a 39 36 0d | 1b 8a 45 20 e7 20 64 6f |-NOD*96.|..E . do|
|00004090| 63 6b 5f 68 25 3c 3e 2d | 31 20 8c 20 21 42 55 46 |ck_h%<>-|1 . !BUF|
|000040a0| 46 45 52 25 3d 64 6f 63 | 6b 5f 68 25 3a c8 99 20 |FER%=doc|k_h%:.. |
|000040b0| 22 57 69 6d 70 5f 44 65 | 6c 65 74 65 57 69 6e 64 |"Wimp_De|leteWind|
|000040c0| 6f 77 22 2c 2c 42 55 46 | 46 45 52 25 0d 1b 94 20 |ow",,BUF|FER%... |
|000040d0| 20 e7 20 44 4f 46 2b 4e | 4f 44 3e 4d 41 58 20 8c | . DOF+N|OD>MAX .|
|000040e0| 20 44 4f 46 3d 4d 41 58 | 2d 4e 4f 44 0d 1b 9e 11 | DOF=MAX|-NOD....|
|000040f0| 20 f2 63 72 65 61 74 65 | 5f 64 6f 63 6b 0d 1b a8 | .create|_dock...|
|00004100| 15 20 21 42 55 46 46 45 | 52 25 3d 64 6f 63 6b 5f |. !BUFFE|R%=dock_|
|00004110| 68 25 0d 1b b2 2e 20 42 | 55 46 46 45 52 25 21 34 |h%.... B|UFFER%!4|
|00004120| 3d 58 30 3a 42 55 46 46 | 45 52 25 21 38 3d 59 30 |=X0:BUFF|ER%!8=Y0|
|00004130| 2b 34 3a 42 55 46 46 45 | 52 25 21 31 32 3d 58 31 |+4:BUFFE|R%!12=X1|
|00004140| 0d 1b bc 3b 20 42 55 46 | 46 45 52 25 21 31 36 3d |...; BUF|FER%!16=|
|00004150| 59 31 3a 42 55 46 46 45 | 52 25 21 32 30 3d 30 3a |Y1:BUFFE|R%!20=0:|
|00004160| 42 55 46 46 45 52 25 21 | 32 34 3d 30 3a 42 55 46 |BUFFER%!|24=0:BUF|
|00004170| 46 45 52 25 21 32 38 3d | 42 46 25 0d 1b c6 22 20 |FER%!28=|BF%..." |
|00004180| c8 99 20 22 57 69 6d 70 | 5f 4f 70 65 6e 57 69 6e |.. "Wimp|_OpenWin|
|00004190| 64 6f 77 22 2c 2c 42 55 | 46 46 45 52 25 0d 1b d0 |dow",,BU|FFER%...|
|000041a0| 05 e1 0d 1b da 04 0d 1b | e4 13 dd 20 f2 6f 70 65 |........|... .ope|
|000041b0| 6e 5f 73 63 28 42 46 25 | 29 0d 1b ee 0b 20 e7 20 |n_sc(BF%|).... . |
|000041c0| 53 43 20 8c 0d 1b f8 0a | 20 20 58 30 3d 30 0d 1c |SC .....| X0=0..|
|000041d0| 02 17 20 20 e7 20 44 50 | 4f 53 3d 30 20 8c 20 58 |.. . DP|OS=0 . X|
|000041e0| 30 2b 3d 39 36 0d 1c 0c | 0e 20 20 58 31 3d 4f 53 |0+=96...|. X1=OS|
|000041f0| 58 2d 34 0d 1c 16 18 20 | 20 e7 20 44 50 4f 53 3d |X-4.... | . DPOS=|
|00004200| 31 20 8c 20 58 31 2d 3d | 31 30 30 0d 1c 20 1e 20 |1 . X1-=|100.. . |
|00004210| 20 55 53 25 3d 30 3a e7 | 20 53 43 4f 46 3e 30 20 | US%=0:.| SCOF>0 |
|00004220| 8c 20 55 53 25 3d 53 53 | 25 0d 1c 2a 1f 20 20 4e |. US%=SS|%..*. N|
|00004230| 4f 53 43 3d 28 58 31 2d | 58 30 2d 55 53 25 2d 39 |OSC=(X1-|X0-US%-9|
|00004240| 36 29 20 81 20 53 53 25 | 0d 1c 34 35 20 20 e7 20 |6) . SS%|..45 . |
|00004250| 44 50 4f 53 3d 30 20 8c | 20 44 58 46 25 3d 28 58 |DPOS=0 .| DXF%=(X|
|00004260| 31 2d 58 30 2d 55 53 25 | 2d 39 36 29 20 83 20 53 |1-X0-US%|-96) . S|
|00004270| 53 25 2b 34 20 8b 20 44 | 58 46 25 3d 30 0d 1c 3e |S%+4 . D|XF%=0..>|
|00004280| 10 20 20 e7 20 53 43 4f | 46 3e 30 20 8c 0d 1c 48 |. . SCO|F>0 ...H|
|00004290| 43 20 20 20 21 42 55 46 | 46 45 52 25 3d 73 63 6c |C !BUF|FER%=scl|
|000042a0| 65 66 74 5f 68 25 3a 42 | 55 46 46 45 52 25 21 34 |eft_h%:B|UFFER%!4|
|000042b0| 3d 58 30 2b 53 42 25 2d | 39 32 2b 44 58 46 25 3a |=X0+SB%-|92+DXF%:|
|000042c0| 42 55 46 46 45 52 25 21 | 38 3d 4f 53 59 2d 39 32 |BUFFER%!|8=OSY-92|
|000042d0| 0d 1c 52 3b 20 20 20 42 | 55 46 46 45 52 25 21 31 |..R; B|UFFER%!1|
|000042e0| 32 3d 58 30 2b 53 42 25 | 2b 44 58 46 25 3a 42 55 |2=X0+SB%|+DXF%:BU|
|000042f0| 46 46 45 52 25 21 31 36 | 3d 4f 53 59 3a 42 55 46 |FFER%!16|=OSY:BUF|
|00004300| 46 45 52 25 21 32 38 3d | 42 46 25 0d 1c 5c 24 20 |FER%!28=|BF%..\$ |
|00004310| 20 20 c8 99 20 22 57 69 | 6d 70 5f 4f 70 65 6e 57 | .. "Wi|mp_OpenW|
|00004320| 69 6e 64 6f 77 22 2c 2c | 42 55 46 46 45 52 25 0d |indow",,|BUFFER%.|
|00004330| 1c 66 0e 20 20 20 58 30 | 2b 3d 53 53 25 0d 1c 70 |.f. X0|+=SS%..p|
|00004340| 07 20 20 cc 0d 1c 7a 18 | 20 20 20 f2 63 6c 6f 73 |. ...z.| .clos|
|00004350| 65 28 73 63 6c 65 66 74 | 5f 68 25 29 0d 1c 84 07 |e(scleft|_h%)....|
|00004360| 20 20 cd 0d 1c 8e 45 20 | 20 21 42 55 46 46 45 52 | ....E | !BUFFER|
|00004370| 25 3d 73 63 72 69 67 68 | 74 5f 68 25 3a 42 55 46 |%=scrigh|t_h%:BUF|
|00004380| 46 45 52 25 21 34 3d 58 | 30 2b 4e 4f 53 43 2a 53 |FER%!4=X|0+NOSC*S|
|00004390| 53 25 2b 44 58 46 25 3a | 42 55 46 46 45 52 25 21 |S%+DXF%:|BUFFER%!|
|000043a0| 38 3d 4f 53 59 2d 39 32 | 0d 1c 98 42 20 20 42 55 |8=OSY-92|...B BU|
|000043b0| 46 46 45 52 25 21 31 32 | 3d 58 30 2b 4e 4f 53 43 |FFER%!12|=X0+NOSC|
|000043c0| 2a 53 53 25 2b 39 36 2b | 44 58 46 25 3a 42 55 46 |*SS%+96+|DXF%:BUF|
|000043d0| 46 45 52 25 21 31 36 3d | 4f 53 59 3a 42 55 46 46 |FER%!16=|OSY:BUFF|
|000043e0| 45 52 25 21 32 38 3d 42 | 46 25 0d 1c a2 23 20 20 |ER%!28=B|F%...# |
|000043f0| c8 99 20 22 57 69 6d 70 | 5f 4f 70 65 6e 57 69 6e |.. "Wimp|_OpenWin|
|00004400| 64 6f 77 22 2c 2c 42 55 | 46 46 45 52 25 0d 1c ac |dow",,BU|FFER%...|
|00004410| 4a 20 20 e7 20 64 65 66 | 63 75 74 5f 68 25 3c 3e |J . def|cut_h%<>|
|00004420| 2d 31 20 8c 20 21 42 55 | 46 46 45 52 25 3d 64 65 |-1 . !BU|FFER%=de|
|00004430| 66 63 75 74 5f 68 25 3a | c8 99 20 22 57 69 6d 70 |fcut_h%:|.. "Wimp|
|00004440| 5f 44 65 6c 65 74 65 57 | 69 6e 64 6f 77 22 2c 2c |_DeleteW|indow",,|
|00004450| 42 55 46 46 45 52 25 0d | 1c b6 25 20 20 e7 20 53 |BUFFER%.|..% . S|
|00004460| 43 4f 46 2b 4e 4f 53 43 | 3e 4d 41 58 20 8c 20 53 |COF+NOSC|>MAX . S|
|00004470| 43 4f 46 3d 4d 41 58 2d | 4e 4f 53 43 0d 1c c0 14 |COF=MAX-|NOSC....|
|00004480| 20 20 f2 63 72 65 61 74 | 65 5f 64 65 66 63 75 74 | .creat|e_defcut|
|00004490| 0d 1c ca 18 20 20 21 42 | 55 46 46 45 52 25 3d 64 |.... !B|UFFER%=d|
|000044a0| 65 66 63 75 74 5f 68 25 | 0d 1c d4 46 20 20 42 55 |efcut_h%|...F BU|
|000044b0| 46 46 45 52 25 21 34 3d | 58 30 2b 44 58 46 25 3a |FFER%!4=|X0+DXF%:|
|000044c0| 42 55 46 46 45 52 25 21 | 38 3d 4f 53 59 2d 39 32 |BUFFER%!|8=OSY-92|
|000044d0| 3a 42 55 46 46 45 52 25 | 21 31 32 3d 58 30 2b 4e |:BUFFER%|!12=X0+N|
|000044e0| 4f 53 43 2a 53 53 25 2d | 34 2b 44 58 46 25 0d 1c |OSC*SS%-|4+DXF%..|
|000044f0| de 3d 20 20 42 55 46 46 | 45 52 25 21 31 36 3d 4f |.= BUFF|ER%!16=O|
|00004500| 53 59 3a 42 55 46 46 45 | 52 25 21 32 30 3d 30 3a |SY:BUFFE|R%!20=0:|
|00004510| 42 55 46 46 45 52 25 21 | 32 34 3d 30 3a 42 55 46 |BUFFER%!|24=0:BUF|
|00004520| 46 45 52 25 21 32 38 3d | 42 46 25 0d 1c e8 23 20 |FER%!28=|BF%...# |
|00004530| 20 c8 99 20 22 57 69 6d | 70 5f 4f 70 65 6e 57 69 | .. "Wim|p_OpenWi|
|00004540| 6e 64 6f 77 22 2c 2c 42 | 55 46 46 45 52 25 0d 1c |ndow",,B|UFFER%..|
|00004550| f2 1f 20 20 f2 72 65 64 | 72 61 77 5f 69 63 6f 6e |.. .red|raw_icon|
|00004560| 28 64 65 66 61 70 70 5f | 68 25 2c 30 29 0d 1c fc |(defapp_|h%,0)...|
|00004570| 18 20 20 21 42 55 46 46 | 45 52 25 3d 64 65 66 61 |. !BUFF|ER%=defa|
|00004580| 70 70 5f 68 25 0d 1d 06 | 42 20 20 42 55 46 46 45 |pp_h%...|B BUFFE|
|00004590| 52 25 21 34 3d 58 30 2b | 44 58 46 25 3a 42 55 46 |R%!4=X0+|DXF%:BUF|
|000045a0| 46 45 52 25 21 38 3d 4f | 53 59 2d 39 36 2d 34 32 |FER%!8=O|SY-96-42|
|000045b0| 3a 42 55 46 46 45 52 25 | 21 31 32 3d 58 30 2b 34 |:BUFFER%|!12=X0+4|
|000045c0| 30 34 2b 44 58 46 25 0d | 1d 10 40 20 20 42 55 46 |04+DXF%.|..@ BUF|
|000045d0| 46 45 52 25 21 31 36 3d | 4f 53 59 2d 39 36 3a 42 |FER%!16=|OSY-96:B|
|000045e0| 55 46 46 45 52 25 21 32 | 30 3d 30 3a 42 55 46 46 |UFFER%!2|0=0:BUFF|
|000045f0| 45 52 25 21 32 34 3d 30 | 3a 42 55 46 46 45 52 25 |ER%!24=0|:BUFFER%|
|00004600| 21 32 38 3d 42 46 25 0d | 1d 1a 23 20 20 c8 99 20 |!28=BF%.|..# .. |
|00004610| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|00004620| 22 2c 2c 42 55 46 46 45 | 52 25 0d 1d 24 06 20 cc |",,BUFFE|R%..$. .|
|00004630| 0d 1d 2e 29 20 20 e7 20 | 64 65 66 63 75 74 5f 68 |...) . |defcut_h|
|00004640| 25 3c 3e 2d 31 20 8c 20 | f2 63 6c 6f 73 65 28 64 |%<>-1 . |.close(d|
|00004650| 65 66 63 75 74 5f 68 25 | 29 0d 1d 38 2a 20 20 f2 |efcut_h%|)..8* .|
|00004660| 63 6c 6f 73 65 28 73 63 | 72 69 67 68 74 5f 68 25 |close(sc|right_h%|
|00004670| 29 3a f2 63 6c 6f 73 65 | 28 73 63 6c 65 66 74 5f |):.close|(scleft_|
|00004680| 68 25 29 0d 1d 42 17 20 | 20 f2 63 6c 6f 73 65 28 |h%)..B. | .close(|
|00004690| 64 65 66 61 70 70 5f 68 | 25 29 0d 1d 4c 06 20 cd |defapp_h|%)..L. .|
|000046a0| 0d 1d 56 05 e1 0d 1d 60 | 04 0d 1d 6a 12 dd 20 f2 |..V....`|...j.. .|
|000046b0| 72 65 61 64 76 64 75 69 | 6e 66 6f 0d 1d 74 45 20 |readvdui|nfo..tE |
|000046c0| 42 55 46 46 45 52 25 21 | 30 3d 34 3a 42 55 46 46 |BUFFER%!|0=4:BUFF|
|000046d0| 45 52 25 21 34 3d 35 3a | 42 55 46 46 45 52 25 21 |ER%!4=5:|BUFFER%!|
|000046e0| 38 3d 33 3a 42 55 46 46 | 45 52 25 21 31 32 3d 31 |8=3:BUFF|ER%!12=1|
|000046f0| 34 39 3a 42 55 46 46 45 | 52 25 21 31 36 3d 31 31 |49:BUFFE|R%!16=11|
|00004700| 0d 1d 7e 2d 20 42 55 46 | 46 45 52 25 21 32 30 3d |..~- BUF|FER%!20=|
|00004710| 31 32 3a 42 55 46 46 45 | 52 25 21 32 34 3d 36 3a |12:BUFFE|R%!24=6:|
|00004720| 42 55 46 46 45 52 25 21 | 32 38 3d 2d 31 0d 1d 88 |BUFFER%!|28=-1...|
|00004730| 30 20 c8 99 20 22 4f 53 | 5f 52 65 61 64 56 64 75 |0 .. "OS|_ReadVdu|
|00004740| 56 61 72 69 61 62 6c 65 | 73 22 2c 42 55 46 46 45 |Variable|s",BUFFE|
|00004750| 52 25 2c 42 55 46 46 45 | 52 25 2b 36 34 0d 1d 92 |R%,BUFFE|R%+64...|
|00004760| 24 20 48 50 4f 54 3d 42 | 55 46 46 45 52 25 21 36 |$ HPOT=B|UFFER%!6|
|00004770| 34 3a 56 50 4f 54 3d 42 | 55 46 46 45 52 25 21 36 |4:VPOT=B|UFFER%!6|
|00004780| 38 0d 1d 9c 1e 20 48 46 | 41 4b 3d 31 3c 3c 48 50 |8.... HF|AK=1<<HP|
|00004790| 4f 54 3a 56 46 41 4b 3d | 31 3c 3c 56 50 4f 54 0d |OT:VFAK=|1<<VPOT.|
|000047a0| 1d a6 28 20 4e 43 4f 4c | 3d 42 55 46 46 45 52 25 |..( NCOL|=BUFFER%|
|000047b0| 21 37 32 2b 31 3a 53 43 | 52 41 44 52 3d 42 55 46 |!72+1:SC|RADR=BUF|
|000047c0| 46 45 52 25 21 37 36 0d | 1d b0 28 20 48 52 45 53 |FER%!76.|..( HRES|
|000047d0| 3d 42 55 46 46 45 52 25 | 21 38 30 2b 31 3a 56 52 |=BUFFER%|!80+1:VR|
|000047e0| 45 53 3d 42 55 46 46 45 | 52 25 21 38 34 2b 31 0d |ES=BUFFE|R%!84+1.|
|000047f0| 1d ba 2a 20 48 4d 41 58 | 3d 48 46 41 4b 2a 28 48 |..* HMAX|=HFAK*(H|
|00004800| 52 45 53 2d 31 29 3a 56 | 4d 41 58 3d 56 46 41 4b |RES-1):V|MAX=VFAK|
|00004810| 2a 28 56 52 45 53 2d 31 | 29 0d 1d c4 13 20 4c 4c |*(VRES-1|).... LL|
|00004820| 25 3d 42 55 46 46 45 52 | 25 21 38 38 0d 1d ce 13 |%=BUFFER|%!88....|
|00004830| 20 50 4f 46 46 25 3d 4c | 4c 25 2f 48 52 45 53 0d | POFF%=L|L%/HRES.|
|00004840| 1d d8 20 20 4f 53 58 3d | 48 46 41 4b 2a 48 52 45 |.. OSX=|HFAK*HRE|
|00004850| 53 3a 4f 53 59 3d 56 46 | 41 4b 2a 56 52 45 53 0d |S:OSY=VF|AK*VRES.|
|00004860| 1d e2 05 e1 0d 1d ec 04 | 0d 1d f6 0f dd 20 a4 6c |........|..... .l|
|00004870| 65 61 66 28 41 24 29 0d | 1e 00 0a 20 42 24 3d 22 |eaf(A$).|... B$="|
|00004880| 22 0d 1e 0a 0f 20 41 3d | a7 41 24 2c 22 2e 22 29 |".... A=|.A$,".")|
|00004890| 0d 1e 14 0c 20 e7 20 41 | 3d 30 20 8c 0d 1e 1e 0b |.... . A|=0 .....|
|000048a0| 20 20 42 24 3d 41 24 0d | 1e 28 06 20 cc 0d 1e 32 | B$=A$.|.(. ...2|
|000048b0| 07 20 20 f5 0d 1e 3c 0a | 20 20 20 42 3d 41 0d 1e |. ...<.| B=A..|
|000048c0| 46 15 20 20 20 41 3d a7 | 41 24 2c 22 2e 22 2c 42 |F. A=.|A$,".",B|
|000048d0| 2b 31 29 0d 1e 50 0b 20 | 20 fd 20 41 3d 30 0d 1e |+1)..P. | . A=0..|
|000048e0| 5a 11 20 20 42 24 3d c1 | 41 24 2c 42 2b 31 29 0d |Z. B$=.|A$,B+1).|
|000048f0| 1e 64 06 20 cd 0d 1e 6e | 07 3d 42 24 0d 1e 78 04 |.d. ...n|.=B$..x.|
|00004900| 0d 1e 82 0c dd 20 f2 63 | 6f 64 65 73 0d 1e 8c 0e |..... .c|odes....|
|00004910| 20 e3 20 4e 3d 30 20 b8 | 20 38 0d 1e 96 16 20 20 | . N=0 .| 8.... |
|00004920| 43 4f 44 45 53 25 28 4e | 29 3d 26 31 38 31 2b 4e |CODES%(N|)=&181+N|
|00004930| 0d 1e a0 08 20 ed 20 4e | 0d 1e aa 0f 20 e3 20 4e |.... . N|.... . N|
|00004940| 3d 39 20 b8 20 31 31 0d | 1e b4 18 20 20 43 4f 44 |=9 . 11.|... COD|
|00004950| 45 53 25 28 4e 29 3d 26 | 31 43 41 2b 4e 2d 39 0d |ES%(N)=&|1CA+N-9.|
|00004960| 1e be 08 20 ed 20 4e 0d | 1e c8 14 20 43 4f 44 45 |... . N.|... CODE|
|00004970| 53 25 28 31 32 29 3d 26 | 31 38 30 0d 1e d2 05 e1 |S%(12)=&|180.....|
|00004980| 0d 1e dc 04 0d 1e e6 12 | dd 20 f2 61 63 6b 6e 6f |........|. .ackno|
|00004990| 77 6c 65 64 67 65 0d 1e | f0 20 20 21 42 55 46 46 |wledge..|. !BUFF|
|000049a0| 45 52 25 3d 32 30 3a 42 | 55 46 46 45 52 25 21 31 |ER%=20:B|UFFER%!1|
|000049b0| 32 3d 52 45 46 25 0d 1e | fa 11 20 42 55 46 46 45 |2=REF%..|.. BUFFE|
|000049c0| 52 25 21 31 36 3d 34 0d | 1f 04 25 20 c8 99 20 22 |R%!16=4.|..% .. "|
|000049d0| 57 69 6d 70 5f 53 65 6e | 64 4d 65 73 73 61 67 65 |Wimp_Sen|dMessage|
|000049e0| 22 2c 31 37 2c 42 55 46 | 46 45 52 25 0d 1f 0e 05 |",17,BUF|FER%....|
|000049f0| e1 0d 1f 18 04 0d 1f 22 | 11 dd 20 a4 67 65 74 31 |......."|.. .get1|
|00004a00| 32 28 41 44 25 29 0d 1f | 2c 0a ea 20 41 24 2c 4e |2(AD%)..|,.. A$,N|
|00004a10| 0d 1f 36 0e 20 41 24 3d | 22 22 3a 4e 3d 30 0d 1f |..6. A$=|"":N=0..|
|00004a20| 40 23 20 c8 95 20 4e 3c | 31 32 20 80 20 41 44 25 |@# .. N<|12 . AD%|
|00004a30| 3f 4e 3c 3e 30 20 80 20 | 41 44 25 3f 4e 3c 3e 31 |?N<>0 . |AD%?N<>1|
|00004a40| 33 0d 1f 4a 17 20 20 41 | 24 2b 3d bd 28 41 44 25 |3..J. A|$+=.(AD%|
|00004a50| 3f 4e 29 3a 4e 2b 3d 31 | 0d 1f 54 06 20 ce 0d 1f |?N):N+=1|..T. ...|
|00004a60| 5e 07 3d 41 24 0d 1f 68 | 04 0d 1f 72 14 dd 20 f2 |^.=A$..h|...r.. .|
|00004a70| 6f 70 65 6e 28 48 41 4e | 44 4c 45 25 29 0d 1f 7c |open(HAN|DLE%)..||
|00004a80| 15 20 21 42 55 46 46 45 | 52 25 3d 48 41 4e 44 4c |. !BUFFE|R%=HANDL|
|00004a90| 45 25 0d 1f 86 26 20 c8 | 99 20 22 57 69 6d 70 5f |E%...& .|. "Wimp_|
|00004aa0| 47 65 74 57 69 6e 64 6f | 77 53 74 61 74 65 22 2c |GetWindo|wState",|
|00004ab0| 2c 42 55 46 46 45 52 25 | 0d 1f 90 22 20 c8 99 20 |,BUFFER%|..." .. |
|00004ac0| 22 57 69 6d 70 5f 4f 70 | 65 6e 57 69 6e 64 6f 77 |"Wimp_Op|enWindow|
|00004ad0| 22 2c 2c 42 55 46 46 45 | 52 25 0d 1f 9a 05 e1 0d |",,BUFFE|R%......|
|00004ae0| 1f a4 04 0d 1f ae 15 dd | 20 f2 63 6c 6f 73 65 28 |........| .close(|
|00004af0| 48 41 4e 44 4c 45 25 29 | 0d 1f b8 15 20 21 42 55 |HANDLE%)|.... !BU|
|00004b00| 46 46 45 52 25 3d 48 41 | 4e 44 4c 45 25 0d 1f c2 |FFER%=HA|NDLE%...|
|00004b10| 23 20 c8 99 20 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |# .. "Wi|mp_Close|
|00004b20| 57 69 6e 64 6f 77 22 2c | 2c 42 55 46 46 45 52 25 |Window",|,BUFFER%|
|00004b30| 0d 1f cc 05 e1 0d 1f d6 | 04 0d 1f e0 10 dd 20 f2 |........|...... .|
|00004b40| 63 6c 6f 73 65 5f 61 6c | 6c 0d 1f ea 16 20 f2 63 |close_al|l.... .c|
|00004b50| 6c 6f 73 65 28 64 65 66 | 63 75 74 5f 68 25 29 0d |lose(def|cut_h%).|
|00004b60| 1f f4 14 20 f2 63 6c 6f | 73 65 28 64 6f 63 6b 5f |... .clo|se(dock_|
|00004b70| 68 25 29 0d 1f fe 16 20 | f2 63 6c 6f 73 65 28 64 |h%).... |.close(d|
|00004b80| 65 66 61 70 70 5f 68 25 | 29 0d 20 08 17 20 f2 63 |efapp_h%|). .. .c|
|00004b90| 6c 6f 73 65 28 73 63 72 | 69 67 68 74 5f 68 25 29 |lose(scr|ight_h%)|
|00004ba0| 0d 20 12 16 20 f2 63 6c | 6f 73 65 28 73 63 6c 65 |. .. .cl|ose(scle|
|00004bb0| 66 74 5f 68 25 29 0d 20 | 1c 12 20 f2 63 6c 6f 73 |ft_h%). |.. .clos|
|00004bc0| 65 28 75 70 5f 68 25 29 | 0d 20 26 14 20 f2 63 6c |e(up_h%)|. &. .cl|
|00004bd0| 6f 73 65 28 64 6f 77 6e | 5f 68 25 29 0d 20 30 05 |ose(down|_h%). 0.|
|00004be0| e1 0d 20 3a 04 0d 20 44 | 10 dd 20 f2 63 6c 65 61 |.. :.. D|.. .clea|
|00004bf0| 72 5f 61 6c 6c 0d 20 4e | 0f 20 e3 20 4e 3d 30 20 |r_all. N|. . N=0 |
|00004c00| b8 20 31 36 0d 20 58 42 | 20 20 21 42 55 46 46 45 |. 16. XB| !BUFFE|
|00004c10| 52 25 3d 73 68 6f 72 74 | 5f 68 25 3a 42 55 46 46 |R%=short|_h%:BUFF|
|00004c20| 45 52 25 21 34 3d 4e 3a | 42 55 46 46 45 52 25 21 |ER%!4=N:|BUFFER%!|
|00004c30| 38 3d 30 3a 42 55 46 46 | 45 52 25 21 31 32 3d 28 |8=0:BUFF|ER%!12=(|
|00004c40| 31 3c 3c 32 31 29 0d 20 | 62 25 20 20 c8 99 20 22 |1<<21). |b% .. "|
|00004c50| 57 69 6d 70 5f 53 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Set|IconStat|
|00004c60| 65 22 2c 2c 42 55 46 46 | 45 52 25 0d 20 6c 08 20 |e",,BUFF|ER%. l. |
|00004c70| ed 20 4e 0d 20 76 05 e1 | 0d 20 80 04 0d 20 8a 16 |. N. v..|. ... ..|
|00004c80| dd 20 a4 47 65 74 46 69 | 6c 65 49 6e 66 6f 28 46 |. .GetFi|leInfo(F|
|00004c90| 24 29 0d 20 94 08 20 ea | 20 85 0d 20 9e 1b 20 ee |$). .. .| .. .. .|
|00004ca0| 20 85 20 ea 3a f2 65 72 | 72 65 70 6f 72 74 28 f6 | . .:.er|report(.|
|00004cb0| 24 29 3a 3d a3 0d 20 a8 | 0d 20 46 49 4c 45 4f 4b |$):=.. .|. FILEOK|
|00004cc0| 3d b9 0d 20 b2 3b 20 e7 | 20 46 24 3c 3e 22 22 20 |=.. .; .| F$<>"" |
|00004cd0| 8c 20 c8 99 20 22 4f 53 | 5f 46 69 6c 65 22 2c 35 |. .. "OS|_File",5|
|00004ce0| 2c 46 24 20 b8 20 54 25 | 2c 2c 6c 61 64 64 72 25 |,F$ . T%|,,laddr%|
|00004cf0| 2c 65 61 64 64 72 25 2c | 4c 25 2c 41 25 0d 20 bc |,eaddr%,|L%,A%. .|
|00004d00| 33 20 e7 20 28 46 24 3d | 22 22 29 20 84 20 28 28 |3 . (F$=|"") . ((|
|00004d10| 54 25 3d 31 29 20 80 20 | 28 41 25 20 80 20 31 29 |T%=1) . |(A% . 1)|
|00004d20| 20 80 20 28 4c 25 3e 38 | 29 29 20 3d 20 30 20 8c | . (L%>8|)) = 0 .|
|00004d30| 0d 20 c6 1c 20 20 54 68 | 69 73 46 69 6c 65 24 3d |. .. Th|isFile$=|
|00004d40| 22 3c 75 6e 74 69 74 6c | 65 64 3e 22 0d 20 d0 12 |"<untitl|ed>". ..|
|00004d50| 20 20 46 69 6c 65 53 69 | 7a 65 24 3d 22 22 0d 20 | FileSi|ze$="". |
|00004d60| da 12 20 20 46 69 6c 65 | 54 79 70 65 24 3d 22 22 |.. File|Type$=""|
|00004d70| 0d 20 e4 12 20 20 46 69 | 6c 65 44 61 74 65 24 3d |. .. Fi|leDate$=|
|00004d80| 22 22 0d 20 ee 0e 20 20 | 46 49 4c 45 4f 4b 3d a3 |"". .. |FILEOK=.|
|00004d90| 0d 20 f8 06 20 cc 0d 21 | 02 12 20 20 54 68 69 73 |. .. ..!|.. This|
|00004da0| 46 69 6c 65 24 3d 46 24 | 0d 21 0c 15 20 20 46 69 |File$=F$|.!.. Fi|
|00004db0| 6c 65 53 69 7a 65 24 3d | c3 28 4c 25 29 0d 21 16 |leSize$=|.(L%).!.|
|00004dc0| 22 20 20 e7 20 28 28 6c | 61 64 64 72 25 3e 3e 32 |" . ((l|addr%>>2|
|00004dd0| 30 29 80 26 46 46 46 29 | 3d 26 46 46 46 20 8c 0d |0).&FFF)|=&FFF ..|
|00004de0| 21 20 13 20 20 20 46 69 | 6c 65 54 79 70 65 24 3d |! . Fi|leType$=|
|00004df0| 22 22 0d 21 2a 38 20 20 | 20 e7 20 28 6c 61 64 64 |"".!*8 | . (ladd|
|00004e00| 72 25 3e 3e 38 20 80 20 | 26 46 46 46 29 3d 26 30 |r%>>8 . |&FFF)=&0|
|00004e10| 46 31 20 8c 20 46 69 6c | 65 54 79 70 65 24 3d 20 |F1 . Fil|eType$= |
|00004e20| 22 49 63 6f 6e 20 20 20 | 20 22 0d 21 34 38 20 20 |"Icon | ".!48 |
|00004e30| 20 e7 20 28 6c 61 64 64 | 72 25 3e 3e 38 20 80 20 | . (ladd|r%>>8 . |
|00004e40| 26 46 46 46 29 3d 26 46 | 45 43 20 8c 20 46 69 6c |&FFF)=&F|EC . Fil|
|00004e50| 65 54 79 70 65 24 3d 20 | 22 54 65 6d 70 6c 61 74 |eType$= |"Templat|
|00004e60| 65 22 0d 21 3e 38 20 20 | 20 e7 20 28 6c 61 64 64 |e".!>8 | . (ladd|
|00004e70| 72 25 3e 3e 38 20 80 20 | 26 46 46 46 29 3d 26 46 |r%>>8 . |&FFF)=&F|
|00004e80| 46 39 20 8c 20 46 69 6c | 65 54 79 70 65 24 3d 20 |F9 . Fil|eType$= |
|00004e90| 22 53 70 72 69 74 65 20 | 20 22 0d 21 48 20 20 20 |"Sprite | ".!H |
|00004ea0| 20 e7 20 46 69 6c 65 54 | 79 70 65 24 3d 22 22 20 | . FileT|ype$="" |
|00004eb0| 8c 20 46 49 4c 45 4f 4b | 3d a3 0d 21 52 38 20 20 |. FILEOK|=..!R8 |
|00004ec0| 20 46 69 6c 65 54 79 70 | 65 24 3d 46 69 6c 65 54 | FileTyp|e$=FileT|
|00004ed0| 79 70 65 24 2b c2 22 30 | 30 22 2b c3 7e 28 6c 61 |ype$+."0|0"+.~(la|
|00004ee0| 64 64 72 25 3e 3e 38 20 | 80 20 26 46 46 46 29 2c |ddr%>>8 |. &FFF),|
|00004ef0| 33 29 0d 21 5c 14 20 20 | 20 74 69 6d 65 25 3d 42 |3).!\. | time%=B|
|00004f00| 55 46 46 45 52 25 0d 21 | 66 1b 20 20 20 74 69 6d |UFFER%.!|f. tim|
|00004f10| 65 25 3f 34 3d 6c 61 64 | 64 72 25 20 80 20 26 46 |e%?4=lad|dr% . &F|
|00004f20| 46 0d 21 70 1f 20 20 20 | 74 69 6d 65 25 3f 33 3d |F.!p. |time%?3=|
|00004f30| 65 61 64 64 72 25 3e 3e | 32 34 20 80 20 26 46 46 |eaddr%>>|24 . &FF|
|00004f40| 0d 21 7a 1f 20 20 20 74 | 69 6d 65 25 3f 32 3d 65 |.!z. t|ime%?2=e|
|00004f50| 61 64 64 72 25 3e 3e 31 | 36 20 80 20 26 46 46 0d |addr%>>1|6 . &FF.|
|00004f60| 21 84 1f 20 20 20 74 69 | 6d 65 25 3f 31 3d 65 61 |!.. ti|me%?1=ea|
|00004f70| 64 64 72 25 3e 3e 38 20 | 20 80 20 26 46 46 0d 21 |ddr%>>8 | . &FF.!|
|00004f80| 8e 1f 20 20 20 74 69 6d | 65 25 3f 30 3d 65 61 64 |.. tim|e%?0=ead|
|00004f90| 64 72 25 20 20 20 20 20 | 80 20 26 46 46 0d 21 98 |dr% |. &FF.!.|
|00004fa0| 3f 20 20 20 c8 99 20 22 | 4f 53 5f 43 6f 6e 76 65 |? .. "|OS_Conve|
|00004fb0| 72 74 53 74 61 6e 64 61 | 72 64 44 61 74 65 41 6e |rtStanda|rdDateAn|
|00004fc0| 64 54 69 6d 65 22 2c 20 | 74 69 6d 65 25 2c 20 46 |dTime", |time%, F|
|00004fd0| 69 6c 65 44 61 74 65 24 | 2c 20 32 38 0d 21 a2 07 |ileDate$|, 28.!..|
|00004fe0| 20 20 cd 0d 21 ac 36 20 | 20 e7 20 46 69 6c 65 54 | ..!.6 | . FileT|
|00004ff0| 79 70 65 24 3d 22 54 65 | 6d 70 6c 61 74 65 22 20 |ype$="Te|mplate" |
|00005000| 80 20 4c 25 3e 6c 62 75 | 66 66 6c 65 6e 25 20 8c |. L%>lbu|fflen% .|
|00005010| 20 46 49 4c 45 4f 4b 3d | a3 0d 21 b6 06 20 cd 0d | FILEOK=|..!.. ..|
|00005020| 21 c0 0d 20 41 24 3d 22 | 57 45 44 22 0d 21 ca 0b |!.. A$="|WED".!..|
|00005030| 3d 46 49 4c 45 4f 4b 0d | 21 d4 04 0d 21 de 19 dd |=FILEOK.|!...!...|
|00005040| 20 f2 67 65 74 5f 73 74 | 61 74 65 28 48 41 4e 44 | .get_st|ate(HAND|
|00005050| 4c 45 25 29 0d 21 e8 15 | 20 21 42 55 46 46 45 52 |LE%).!..| !BUFFER|
|00005060| 25 3d 48 41 4e 44 4c 45 | 25 0d 21 f2 26 20 c8 99 |%=HANDLE|%.!.& ..|
|00005070| 20 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 | "Wimp_G|etWindow|
|00005080| 53 74 61 74 65 22 2c 2c | 42 55 46 46 45 52 25 0d |State",,|BUFFER%.|
|00005090| 21 fc 0c 20 f2 63 6f 6f | 72 64 73 0d 22 06 05 e1 |!.. .coo|rds."...|
|000050a0| 0d 22 10 04 0d 22 1a 0d | dd 20 f2 63 6f 6f 72 64 |."..."..|. .coord|
|000050b0| 73 0d 22 24 3a 20 58 30 | 3d 42 55 46 46 45 52 25 |s."$: X0|=BUFFER%|
|000050c0| 21 34 3a 59 30 3d 42 55 | 46 46 45 52 25 21 38 3a |!4:Y0=BU|FFER%!8:|
|000050d0| 58 31 3d 42 55 46 46 45 | 52 25 21 31 32 3a 59 31 |X1=BUFFE|R%!12:Y1|
|000050e0| 3d 42 55 46 46 45 52 25 | 21 31 36 0d 22 2e 32 20 |=BUFFER%|!16.".2 |
|000050f0| 53 43 58 3d 42 55 46 46 | 45 52 25 21 32 30 3a 53 |SCX=BUFF|ER%!20:S|
|00005100| 43 59 3d 42 55 46 46 45 | 52 25 21 32 34 3a 42 45 |CY=BUFFE|R%!24:BE|
|00005110| 48 25 3d 42 55 46 46 45 | 52 25 21 32 38 0d 22 38 |H%=BUFFE|R%!28."8|
|00005120| 05 e1 0d 22 42 04 0d 22 | 4c 12 dd 20 f2 67 65 74 |..."B.."|L.. .get|
|00005130| 5f 70 6f 69 6e 74 65 72 | 0d 22 56 21 20 c8 99 20 |_pointer|."V! .. |
|00005140| 22 57 69 6d 70 5f 47 65 | 74 50 6f 69 6e 74 65 72 |"Wimp_Ge|tPointer|
|00005150| 49 6e 66 6f 22 2c 2c 51 | 25 0d 22 60 36 20 58 25 |Info",,Q|%."`6 X%|
|00005160| 3d 21 51 25 3a 59 25 3d | 51 25 21 34 3a 42 54 25 |=!Q%:Y%=|Q%!4:BT%|
|00005170| 3d 51 25 21 38 3a 48 41 | 4e 44 4c 45 25 3d 51 25 |=Q%!8:HA|NDLE%=Q%|
|00005180| 21 31 32 3a 49 43 4f 4e | 25 3d 51 25 21 31 36 0d |!12:ICON|%=Q%!16.|
|00005190| 22 6a 05 e1 0d 22 74 04 | 0d 22 7e 0d dd 20 f2 66 |"j..."t.|."~.. .f|
|000051a0| 69 6e 69 73 68 0d 22 88 | 25 20 c8 99 20 22 57 69 |inish.".|% .. "Wi|
|000051b0| 6d 70 5f 43 6c 6f 73 65 | 44 6f 77 6e 22 2c 74 61 |mp_Close|Down",ta|
|000051c0| 73 6b 5f 68 25 2c 54 41 | 53 4b 0d 22 92 0a 20 ee |sk_h%,TA|SK.".. .|
|000051d0| 20 85 20 87 0d 22 9c 05 | e1 0d 22 a6 04 0d 22 b0 | . .."..|.."...".|
|000051e0| 16 dd 20 a4 67 65 74 5f | 73 74 72 69 6e 67 28 41 |.. .get_|string(A|
|000051f0| 44 25 29 0d 22 ba 09 20 | ea 20 41 24 0d 22 c4 0a |D%).".. |. A$."..|
|00005200| 20 41 24 3d 22 22 0d 22 | ce 1a 20 c8 95 20 3f 41 | A$=""."|.. .. ?A|
|00005210| 44 25 3c 3e 30 20 80 20 | 3f 41 44 25 3c 3e 31 33 |D%<>0 . |?AD%<>13|
|00005220| 0d 22 d8 16 20 20 41 24 | 2b 3d bd 3f 41 44 25 3a |.".. A$|+=.?AD%:|
|00005230| 41 44 25 2b 3d 31 0d 22 | e2 06 20 ce 0d 22 ec 07 |AD%+=1."|.. .."..|
|00005240| 3d 41 24 0d 22 f6 04 0d | 23 00 12 dd 20 a4 67 65 |=A$."...|#... .ge|
|00005250| 74 5f 6c 69 6e 65 28 53 | 29 0d 23 0a 0a ea 20 41 |t_line(S|).#... A|
|00005260| 24 2c 42 0d 23 14 10 20 | 41 24 3d 22 22 3a 42 3d |$,B.#.. |A$="":B=|
|00005270| 32 35 36 0d 23 1e 14 20 | c8 95 20 ac 20 c5 23 53 |256.#.. |.. . .#S|
|00005280| 20 80 20 42 3e 33 31 0d | 23 28 0b 20 20 42 3d 9a | . B>31.|#(. B=.|
|00005290| 23 53 0d 23 32 15 20 20 | e7 20 42 3e 33 31 20 8c |#S.#2. |. B>31 .|
|000052a0| 20 41 24 2b 3d bd 42 0d | 23 3c 06 20 ce 0d 23 46 | A$+=.B.|#<. ..#F|
|000052b0| 07 3d 41 24 0d 23 50 04 | 0d 23 5a 11 dd 20 a4 67 |.=A$.#P.|.#Z.. .g|
|000052c0| 65 74 5f 6e 75 6d 28 53 | 29 0d 23 64 0a ea 20 41 |et_num(S|).#d.. A|
|000052d0| 24 2c 42 0d 23 6e 0f 20 | 41 24 3d 22 22 3a 42 3d |$,B.#n. |A$="":B=|
|000052e0| 34 38 0d 23 78 39 20 c8 | 95 20 ac 20 c5 23 53 20 |48.#x9 .|. . .#S |
|000052f0| 80 20 28 28 42 3e 3d 97 | 22 30 22 20 80 20 42 3c |. ((B>=.|"0" . B<|
|00005300| 3d 97 22 39 22 29 20 84 | 20 28 42 3d 97 22 2d 22 |=."9") .| (B=."-"|
|00005310| 20 80 20 41 24 3d 22 2d | 22 29 29 0d 23 82 0b 20 | . A$="-|")).#.. |
|00005320| 20 42 3d 9a 23 53 0d 23 | 8c 15 20 20 e7 20 42 3e | B=.#S.#|.. . B>|
|00005330| 33 31 20 8c 20 41 24 2b | 3d bd 42 0d 23 96 06 20 |31 . A$+|=.B.#.. |
|00005340| ce 0d 23 a0 0a 3d bb 28 | 41 24 29 0d 23 aa 04 0d |..#..=.(|A$).#...|
|00005350| 23 b4 14 dd 20 f2 63 72 | 65 61 74 65 5f 64 65 66 |#... .cr|eate_def|
|00005360| 63 75 74 0d 23 be 4f 20 | 20 20 20 20 20 20 20 20 |cut.#.O | |
|00005370| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005380| 20 f4 20 63 72 65 61 74 | 65 64 20 28 31 31 3a 32 | . creat|ed (11:2|
|00005390| 33 3a 35 39 20 32 35 2d | 4f 63 74 2d 31 39 39 32 |3:59 25-|Oct-1992|
|000053a0| 29 20 62 79 20 57 69 6e | 64 6f 77 45 64 20 31 2e |) by Win|dowEd 1.|
|000053b0| 30 38 0d 23 c8 1f ea 20 | 4e 24 2c 4e 3a 4e 24 3d |08.#... |N$,N:N$=|
|000053c0| bd 31 33 2b 22 20 20 20 | 20 20 20 20 20 20 20 20 |.13+" | |
|000053d0| 22 0d 23 d2 1f 50 25 3d | 57 49 4e 44 4f 57 25 3a |".#..P%=|WINDOW%:|
|000053e0| 4c 25 3d 50 25 2b 77 69 | 6e 64 6f 77 6c 65 6e 25 |L%=P%+wi|ndowlen%|
|000053f0| 0d 23 dc 0b 50 41 53 53 | 3d 31 30 0d 23 e6 0d 5b |.#..PASS|=10.#..[|
|00005400| 4f 50 54 20 50 41 53 53 | 0d 23 f0 11 2e 64 65 66 |OPT PASS|.#...def|
|00005410| 63 75 74 77 69 6e 64 6f | 77 0d 23 fa 41 45 51 55 |cutwindo|w.#.AEQU|
|00005420| 44 20 30 3a 45 51 55 44 | 20 31 30 30 3a 45 51 55 |D 0:EQUD| 100:EQU|
|00005430| 44 20 39 31 32 3a 45 51 | 55 44 20 38 31 36 3a 45 |D 912:EQ|UD 816:E|
|00005440| 51 55 44 20 30 3a 45 51 | 55 44 20 30 3a 45 51 55 |QUD 0:EQ|UD 0:EQU|
|00005450| 44 20 32 35 33 36 39 38 | 34 35 0d 24 04 30 45 51 |D 253698|45.$.0EQ|
|00005460| 55 44 26 41 34 30 30 31 | 38 31 32 3a 45 51 55 44 |UD&A4001|812:EQUD|
|00005470| 26 34 30 30 30 32 46 46 | 3a 45 51 55 44 26 43 30 |&40002FF|:EQUD&C0|
|00005480| 31 30 33 3a 45 51 55 44 | 20 30 0d 24 0e 46 45 51 |103:EQUD| 0.$.FEQ|
|00005490| 55 44 20 2d 39 36 3a 45 | 51 55 44 20 34 30 39 36 |UD -96:E|QUD 4096|
|000054a0| 3a 45 51 55 44 20 30 3a | 45 51 55 44 26 31 39 3a |:EQUD 0:|EQUD&19:|
|000054b0| 45 51 55 44 26 30 3a 45 | 51 55 44 20 53 70 72 69 |EQUD&0:E|QUD Spri|
|000054c0| 74 65 73 25 3a 45 51 55 | 44 26 32 30 30 30 32 30 |tes%:EQU|D&200020|
|000054d0| 0d 24 18 2b 45 51 55 53 | 20 22 53 68 6f 72 74 43 |.$.+EQUS| "ShortC|
|000054e0| 75 74 22 2b bd 31 33 2b | 22 20 20 20 22 3a 3a 3a |ut"+.13+|" ":::|
|000054f0| 45 51 55 44 20 4e 4f 53 | 43 3a 5d 0d 24 22 12 e3 |EQUD NOS|C:].$"..|
|00005500| 20 4e 3d 30 20 b8 20 4e | 4f 53 43 2d 31 0d 24 2c | N=0 . N|OSC-1.$,|
|00005510| 0e 20 5b 4f 50 54 20 50 | 41 53 53 0d 24 36 3a 20 |. [OPT P|ASS.$6: |
|00005520| a4 73 28 53 53 25 2a 4e | 2c 2d 39 32 2c 53 53 25 |.s(SS%*N|,-92,SS%|
|00005530| 2a 4e 2b 53 42 25 2c 30 | 2c 26 32 37 30 31 39 31 |*N+SB%,0|,&270191|
|00005540| 31 42 2c 73 63 74 25 2b | 31 36 2a 4e 2c 73 63 76 |1B,sct%+|16*N,scv|
|00005550| 25 2c 31 36 29 0d 24 40 | 06 20 5d 0d 24 4a 07 ed |%,16).$@|. ].$J..|
|00005560| 20 4e 0d 24 54 20 24 73 | 63 76 25 3d 22 53 73 62 | N.$T $s|cv%="Ssb|
|00005570| 6f 78 2c 73 62 6f 78 5f | 73 3b 4c 34 30 22 2b bd |ox,sbox_|s;L40"+.|
|00005580| 31 33 0d 24 5e 0f f2 73 | 65 74 5f 66 69 65 6c 64 |13.$^..s|et_field|
|00005590| 73 0d 24 68 2f c8 99 20 | 22 57 69 6d 70 5f 43 72 |s.$h/.. |"Wimp_Cr|
|000055a0| 65 61 74 65 57 69 6e 64 | 6f 77 22 2c 2c 57 49 4e |eateWind|ow",,WIN|
|000055b0| 44 4f 57 25 20 b8 20 64 | 65 66 63 75 74 5f 68 25 |DOW% . d|efcut_h%|
|000055c0| 0d 24 72 05 e1 0d 24 7c | 04 0d 24 86 11 dd 20 f2 |.$r...$||..$... .|
|000055d0| 73 65 74 5f 66 69 65 6c | 64 73 0d 24 90 1b 50 25 |set_fiel|ds.$..P%|
|000055e0| 3d 73 63 74 25 3a 4c 25 | 3d 73 63 74 25 2b 73 63 |=sct%:L%|=sct%+sc|
|000055f0| 74 6c 65 6e 25 0d 24 9a | 0c e7 20 41 46 3d b9 20 |tlen%.$.|.. AF=. |
|00005600| 8c 0d 24 a4 13 20 e3 20 | 4e 3d 30 20 b8 20 4e 4f |..$.. . |N=0 . NO|
|00005610| 53 43 2d 31 0d 24 ae 26 | 20 20 24 28 73 63 74 25 |SC-1.$.&| $(sct%|
|00005620| 2b 31 36 2a 4e 29 3d a4 | 67 65 74 5f 73 63 28 41 |+16*N)=.|get_sc(A|
|00005630| 46 4e 2c 53 43 4f 46 2b | 4e 29 0d 24 b8 08 20 ed |FN,SCOF+|N).$.. .|
|00005640| 20 4e 0d 24 c2 05 cc 0d | 24 cc 13 20 e3 20 4e 3d | N.$....|$.. . N=|
|00005650| 30 20 b8 20 4e 4f 53 43 | 2d 31 0d 24 d6 15 20 20 |0 . NOSC|-1.$.. |
|00005660| 24 28 73 63 74 25 2b 31 | 36 2a 4e 29 3d 22 22 0d |$(sct%+1|6*N)="".|
|00005670| 24 e0 08 20 ed 20 4e 0d | 24 ea 05 cd 0d 24 f4 05 |$.. . N.|$....$..|
|00005680| e1 0d 24 fe 04 0d 25 08 | 12 dd 20 f2 63 72 65 61 |..$...%.|.. .crea|
|00005690| 74 65 5f 64 6f 63 6b 0d | 25 12 07 ea 20 4e 0d 25 |te_dock.|%... N.%|
|000056a0| 1c 3e 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.> | |
|000056b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000056c0| 20 20 f4 20 63 72 65 61 | 74 65 64 20 62 79 20 57 | . crea|ted by W|
|000056d0| 69 6e 64 6f 77 45 64 20 | 31 2e 30 34 0d 25 26 15 |indowEd |1.04.%&.|
|000056e0| e3 20 50 41 53 53 3d 38 | 20 b8 20 31 30 20 88 20 |. PASS=8| . 10 . |
|000056f0| 32 0d 25 30 1f 50 25 3d | 57 49 4e 44 4f 57 25 3a |2.%0.P%=|WINDOW%:|
|00005700| 4c 25 3d 50 25 2b 77 69 | 6e 64 6f 77 6c 65 6e 25 |L%=P%+wi|ndowlen%|
|00005710| 0d 25 3a 0d 5b 4f 50 54 | 20 50 41 53 53 0d 25 44 |.%:.[OPT| PASS.%D|
|00005720| 0f 2e 64 6f 63 6b 77 69 | 6e 64 6f 77 0d 25 4e 0d |..dockwi|ndow.%N.|
|00005730| 45 51 55 44 20 31 31 34 | 36 0d 25 58 0a 45 51 55 |EQUD 114|6.%X.EQU|
|00005740| 44 20 34 0d 25 62 0d 45 | 51 55 44 20 31 32 33 38 |D 4.%b.E|QUD 1238|
|00005750| 0d 25 6c 0c 45 51 55 44 | 20 39 38 30 0d 25 76 0a |.%l.EQUD| 980.%v.|
|00005760| 45 51 55 44 20 30 0d 25 | 80 0a 45 51 55 44 20 30 |EQUD 0.%|..EQUD 0|
|00005770| 0d 25 8a 0d 45 51 55 44 | 20 31 37 38 38 0d 25 94 |.%..EQUD| 1788.%.|
|00005780| 2a 45 51 55 44 20 25 31 | 30 30 30 30 30 30 30 30 |*EQUD %1|00000000|
|00005790| 30 30 30 30 30 30 30 30 | 30 30 31 31 30 30 30 30 |00000000|00110000|
|000057a0| 30 30 31 30 30 31 30 0d | 25 9e 12 45 51 55 44 20 |0010010.|%..EQUD |
|000057b0| 26 30 34 30 30 30 32 46 | 46 0d 25 a8 12 45 51 55 |&040002F|F.%..EQU|
|000057c0| 44 20 26 30 30 30 43 30 | 31 30 33 0d 25 b2 0a 45 |D &000C0|103.%..E|
|000057d0| 51 55 44 20 30 0d 25 bc | 0e 45 51 55 44 20 2d 32 |QUD 0.%.|.EQUD -2|
|000057e0| 33 30 34 0d 25 c6 0b 45 | 51 55 44 20 39 32 0d 25 |304.%..E|QUD 92.%|
|000057f0| d0 0a 45 51 55 44 20 30 | 0d 25 da 2a 45 51 55 44 |..EQUD 0|.%.*EQUD|
|00005800| 20 25 30 30 30 30 30 30 | 30 30 30 30 30 30 30 30 | %000000|00000000|
|00005810| 30 30 30 30 30 30 30 30 | 30 30 30 30 30 31 31 30 |00000000|00000110|
|00005820| 30 31 0d 25 e4 2a 45 51 | 55 44 20 25 30 30 30 30 |01.%.*EQ|UD %0000|
|00005830| 30 30 30 30 30 30 30 30 | 30 30 30 30 30 30 30 30 |00000000|00000000|
|00005840| 30 30 30 30 30 30 30 30 | 30 30 30 30 0d 25 ee 11 |00000000|0000.%..|
|00005850| 45 51 55 44 20 53 70 72 | 69 74 65 73 25 0d 25 f8 |EQUD Spr|ites%.%.|
|00005860| 12 45 51 55 44 20 26 30 | 30 30 30 30 30 30 30 0d |.EQUD &0|0000000.|
|00005870| 26 02 1d 45 51 55 53 20 | 22 22 2b bd 31 33 2b 22 |&..EQUS |""+.13+"|
|00005880| 20 20 20 20 20 20 20 20 | 20 20 20 22 0d 26 0c 0e | | ".&..|
|00005890| 45 51 55 44 20 4e 4f 44 | 2a 32 0d 26 16 05 5d 0d |EQUD NOD|*2.&..].|
|000058a0| 26 20 11 e3 20 4e 3d 30 | 20 b8 20 4e 4f 44 2d 31 |& .. N=0| . NOD-1|
|000058b0| 0d 26 2a 12 20 e7 20 44 | 4f 46 2b 4e 3c 44 4f 4e |.&*. . D|OF+N<DON|
|000058c0| 20 8c 0d 26 34 1a 20 20 | 53 50 24 3d a4 6c 65 61 | ..&4. |SP$=.lea|
|000058d0| 66 28 50 24 28 44 4f 46 | 2b 4e 29 29 0d 26 3e 06 |f(P$(DOF|+N)).&>.|
|000058e0| 20 cc 0d 26 48 0c 20 20 | 53 50 24 3d 22 22 0d 26 | ..&H. |SP$="".&|
|000058f0| 52 06 20 cd 0d 26 5c 0e | 20 5b 4f 50 54 20 50 41 |R. ..&\.| [OPT PA|
|00005900| 53 53 0d 26 66 0b 20 45 | 51 55 44 20 30 0d 26 70 |SS.&f. E|QUD 0.&p|
|00005910| 12 20 45 51 55 44 20 2d | 39 32 2d 4e 2a 39 36 0d |. EQUD -|92-N*96.|
|00005920| 26 7a 0c 20 45 51 55 44 | 20 39 32 0d 26 84 0f 20 |&z. EQUD| 92.&.. |
|00005930| 45 51 55 44 20 2d 4e 2a | 39 36 0d 26 8e 2b 20 45 |EQUD -N*|96.&.+ E|
|00005940| 51 55 44 20 25 30 30 30 | 30 30 31 31 31 30 30 30 |QUD %000|00111000|
|00005950| 30 30 30 30 30 30 30 30 | 30 30 30 30 30 30 30 30 |00000000|00000000|
|00005960| 30 30 30 31 30 0d 26 98 | 1e 20 45 51 55 53 20 22 |00010.&.|. EQUS "|
|00005970| 62 6f 78 22 2b bd 31 33 | 2b 22 20 20 20 20 20 20 |box"+.13|+" |
|00005980| 20 20 22 0d 26 a2 0b 20 | 45 51 55 44 20 30 0d 26 | ".&.. |EQUD 0.&|
|00005990| ac 12 20 45 51 55 44 20 | 2d 39 32 2d 4e 2a 39 36 |.. EQUD |-92-N*96|
|000059a0| 0d 26 b6 0c 20 45 51 55 | 44 20 39 32 0d 26 c0 0f |.&.. EQU|D 92.&..|
|000059b0| 20 45 51 55 44 20 2d 4e | 2a 39 36 0d 26 ca 06 20 | EQUD -N|*96.&.. |
|000059c0| 5d 0d 26 d4 14 20 e7 20 | c0 53 50 24 2c 31 29 3d |].&.. . |.SP$,1)=|
|000059d0| 22 21 22 20 8c 0d 26 de | 0f 20 20 5b 4f 50 54 20 |"!" ..&.|. [OPT |
|000059e0| 50 41 53 53 0d 26 e8 2c | 20 20 45 51 55 44 20 25 |PASS.&.,| EQUD %|
|000059f0| 30 30 30 30 30 31 31 31 | 30 30 30 30 30 30 30 30 |00000111|00000000|
|00005a00| 31 30 31 30 30 30 30 31 | 30 30 30 31 31 30 31 30 |10100001|00011010|
|00005a10| 0d 26 f2 16 20 20 45 51 | 55 44 20 64 6f 63 6b 74 |.&.. EQ|UD dockt|
|00005a20| 25 2b 4e 2a 32 34 0d 26 | fc 0c 20 20 45 51 55 44 |%+N*24.&|.. EQUD|
|00005a30| 20 31 0d 27 06 0d 20 20 | 45 51 55 44 20 31 32 0d | 1.'.. |EQUD 12.|
|00005a40| 27 10 07 20 20 5d 0d 27 | 1a 06 20 cc 0d 27 24 11 |'.. ].'|.. ..'$.|
|00005a50| 20 20 e7 20 53 50 24 3c | 3e 22 22 20 8c 0d 27 2e | . SP$<|>"" ..'.|
|00005a60| 10 20 20 20 5b 4f 50 54 | 20 50 41 53 53 0d 27 38 |. [OPT| PASS.'8|
|00005a70| 2d 20 20 20 45 51 55 44 | 20 25 30 30 30 30 30 31 |- EQUD| %000001|
|00005a80| 31 31 30 30 30 30 30 30 | 30 30 31 30 31 30 30 30 |11000000|00101000|
|00005a90| 30 31 30 30 30 31 31 30 | 31 31 0d 27 42 17 20 20 |01000110|11.'B. |
|00005aa0| 20 45 51 55 44 20 64 6f | 63 6b 74 25 2b 4e 2a 32 | EQUD do|ckt%+N*2|
|00005ab0| 34 0d 27 4c 1a 20 20 20 | 45 51 55 44 20 64 6f 63 |4.'L. |EQUD doc|
|00005ac0| 6b 74 25 2b 4e 2a 32 34 | 2b 31 32 0d 27 56 0e 20 |kt%+N*24|+12.'V. |
|00005ad0| 20 20 45 51 55 44 20 31 | 32 0d 27 60 08 20 20 20 | EQUD 1|2.'`. |
|00005ae0| 5d 0d 27 6a 07 20 20 cc | 0d 27 74 10 20 20 20 5b |].'j. .|.'t. [|
|00005af0| 4f 50 54 20 50 41 53 53 | 0d 27 7e 2d 20 20 20 45 |OPT PASS|.'~- E|
|00005b00| 51 55 44 20 25 30 30 30 | 30 30 31 31 31 30 30 30 |QUD %000|00111000|
|00005b10| 30 30 30 30 30 31 30 31 | 30 30 30 30 30 30 30 30 |00000101|00000000|
|00005b20| 31 31 30 30 31 0d 27 88 | 1d 20 20 20 45 51 55 53 |11001.'.|. EQUS|
|00005b30| 20 bd 31 33 2b 22 20 20 | 20 20 20 20 20 20 20 20 | .13+" | |
|00005b40| 20 22 0d 27 92 08 20 20 | 20 5d 0d 27 9c 07 20 20 | ".'.. | ].'.. |
|00005b50| cd 0d 27 a6 06 20 cd 0d | 27 b0 07 ed 20 4e 0d 27 |..'.. ..|'... N.'|
|00005b60| ba 0a ed 20 50 41 53 53 | 0d 27 c4 11 e3 20 4e 3d |... PASS|.'... N=|
|00005b70| 30 20 b8 20 4e 4f 44 2d | 31 0d 27 ce 19 20 53 50 |0 . NOD-|1.'.. SP|
|00005b80| 24 3d a4 6c 65 61 66 28 | 50 24 28 44 4f 46 2b 4e |$=.leaf(|P$(DOF+N|
|00005b90| 29 29 0d 27 d8 15 20 e7 | 20 c0 53 50 24 2c 31 29 |)).'.. .| .SP$,1)|
|00005ba0| 3c 3e 22 21 22 20 8c 0d | 27 e2 0f 20 20 4c 4c 3d |<>"!" ..|'.. LL=|
|00005bb0| a9 28 53 50 24 29 0d 27 | ec 0e 20 20 e7 20 4c 4c |.(SP$).'|.. . LL|
|00005bc0| 3e 35 20 8c 0d 27 f6 1a | 20 20 20 e7 20 ac 20 a4 |>5 ..'..| . . .|
|00005bd0| 63 61 70 69 74 61 6c 28 | 53 50 24 29 20 8c 0d 28 |capital(|SP$) ..(|
|00005be0| 00 14 20 20 20 20 e7 20 | 4c 4c 20 83 20 32 3d 30 |.. . |LL . 2=0|
|00005bf0| 20 8c 0d 28 0a 2a 20 20 | 20 20 20 53 50 24 3d c0 | ..(.* | SP$=.|
|00005c00| 53 50 24 2c 4c 4c 20 81 | 20 32 29 2b 22 20 22 2b |SP$,LL .| 2)+" "+|
|00005c10| c2 53 50 24 2c 4c 4c 20 | 81 20 32 29 0d 28 14 09 |.SP$,LL |. 2).(..|
|00005c20| 20 20 20 20 cc 0d 28 1e | 2e 20 20 20 20 20 53 50 | ..(.|. SP|
|00005c30| 24 3d c0 53 50 24 2c 28 | 4c 4c 20 81 20 32 29 2b |$=.SP$,(|LL . 2)+|
|00005c40| 31 29 2b 22 20 22 2b c2 | 53 50 24 2c 4c 4c 20 81 |1)+" "+.|SP$,LL .|
|00005c50| 20 32 29 0d 28 28 09 20 | 20 20 20 cd 0d 28 32 08 | 2).((. | ..(2.|
|00005c60| 20 20 20 cd 0d 28 3c 07 | 20 20 cd 0d 28 46 06 20 | ..(<.| ..(F. |
|00005c70| cd 0d 28 50 24 20 50 25 | 3d 64 6f 63 6b 74 25 2b |..(P$ P%|=dockt%+|
|00005c80| 4e 2a 32 34 3a 4c 25 3d | 64 6f 63 6b 74 25 2b 64 |N*24:L%=|dockt%+d|
|00005c90| 74 6c 65 6e 25 0d 28 5a | 0c 20 5b 4f 50 54 20 31 |tlen%.(Z|. [OPT 1|
|00005ca0| 30 0d 28 64 11 20 45 51 | 55 53 20 53 50 24 2b bd |0.(d. EQ|US SP$+.|
|00005cb0| 31 33 0d 28 6e 06 20 5d | 0d 28 78 27 20 50 25 3d |13.(n. ]|.(x' P%=|
|00005cc0| 64 6f 63 6b 74 25 2b 4e | 2a 32 34 2b 31 32 3a 4c |dockt%+N|*24+12:L|
|00005cd0| 25 3d 64 6f 63 6b 74 25 | 2b 64 74 6c 65 6e 25 0d |%=dockt%|+dtlen%.|
|00005ce0| 28 82 0c 20 5b 4f 50 54 | 20 31 30 0d 28 8c 19 20 |(.. [OPT| 10.(.. |
|00005cf0| 45 51 55 53 20 22 53 62 | 6f 78 64 3b 4c 34 30 22 |EQUS "Sb|oxd;L40"|
|00005d00| 2b bd 31 33 0d 28 96 06 | 20 5d 0d 28 a0 07 ed 20 |+.13.(..| ].(... |
|00005d10| 4e 0d 28 aa 2d c8 99 20 | 22 57 69 6d 70 5f 43 72 |N.(.-.. |"Wimp_Cr|
|00005d20| 65 61 74 65 57 69 6e 64 | 6f 77 22 2c 2c 57 49 4e |eateWind|ow",,WIN|
|00005d30| 44 4f 57 25 20 b8 20 64 | 6f 63 6b 5f 68 25 0d 28 |DOW% . d|ock_h%.(|
|00005d40| b4 05 e1 0d 28 be 04 0d | 28 c8 14 dd 20 a4 63 61 |....(...|(... .ca|
|00005d50| 70 69 74 61 6c 28 f8 20 | 53 24 29 0d 28 d2 0e 20 |pital(. |S$).(.. |
|00005d60| 41 3d a9 28 53 24 29 2b | 31 0d 28 dc 06 20 f5 0d |A=.(S$)+|1.(.. ..|
|00005d70| 28 e6 0a 20 20 41 2d 3d | 31 0d 28 f0 11 20 20 42 |(.. A-=|1.(.. B|
|00005d80| 24 3d c1 53 24 2c 41 2c | 31 29 0d 28 fa 15 20 fd |$=.S$,A,|1).(.. .|
|00005d90| 20 41 3d 31 20 84 20 97 | 28 42 24 29 3c 39 37 0d | A=1 . .|(B$)<97.|
|00005da0| 29 04 19 20 4c 31 3d 41 | 2d 31 3a e7 20 4c 31 3c |).. L1=A|-1:. L1<|
|00005db0| 30 20 8c 20 4c 31 3d 30 | 0d 29 0e 10 20 4c 32 3d |0 . L1=0|.).. L2=|
|00005dc0| a9 28 53 24 29 2d 4c 31 | 0d 29 18 25 20 e7 20 4c |.(S$)-L1|.).% . L|
|00005dd0| 31 3c 33 20 84 20 4c 32 | 3c 33 20 84 20 4c 31 3e |1<3 . L2|<3 . L1>|
|00005de0| 35 20 84 20 4c 32 3e 35 | 20 8c 3a 3d a3 0d 29 22 |5 . L2>5| .:=..)"|
|00005df0| 1b 20 53 24 3d c0 53 24 | 2c 4c 31 29 2b 22 20 22 |. S$=.S$|,L1)+" "|
|00005e00| 2b c2 53 24 2c 4c 32 29 | 0d 29 2c 06 3d b9 0d 29 |+.S$,L2)|.),.=..)|
|00005e10| 36 04 0d 29 40 11 dd 20 | f2 64 6f 77 6e 77 69 6e |6..)@.. |.downwin|
|00005e20| 64 6f 77 0d 29 4a 3e 20 | 20 20 20 20 20 20 20 20 |dow.)J> | |
|00005e30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00005e40| 20 20 20 20 20 20 20 f4 | 20 63 72 65 61 74 65 64 | .| created|
|00005e50| 20 62 79 20 57 69 6e 64 | 6f 77 45 64 20 31 2e 30 | by Wind|owEd 1.0|
|00005e60| 34 0d 29 54 15 e3 20 50 | 41 53 53 3d 38 20 b8 20 |4.)T.. P|ASS=8 . |
|00005e70| 31 30 20 88 20 32 0d 29 | 5e 1f 50 25 3d 57 49 4e |10 . 2.)|^.P%=WIN|
|00005e80| 44 4f 57 25 3a 4c 25 3d | 50 25 2b 77 69 6e 64 6f |DOW%:L%=|P%+windo|
|00005e90| 77 6c 65 6e 25 0d 29 68 | 0d 5b 4f 50 54 20 50 41 |wlen%.)h|.[OPT PA|
|00005ea0| 53 53 0d 29 72 0f 2e 64 | 6f 77 6e 77 69 6e 64 6f |SS.)r..d|ownwindo|
|00005eb0| 77 0d 29 7c 0c 45 51 55 | 44 20 38 37 36 0d 29 86 |w.)|.EQU|D 876.).|
|00005ec0| 0c 45 51 55 44 20 37 34 | 30 0d 29 90 0c 45 51 55 |.EQUD 74|0.)..EQU|
|00005ed0| 44 20 39 36 38 0d 29 9a | 0c 45 51 55 44 20 38 33 |D 968.).|.EQUD 83|
|00005ee0| 32 0d 29 a4 0a 45 51 55 | 44 20 30 0d 29 ae 0a 45 |2.)..EQU|D 0.)..E|
|00005ef0| 51 55 44 20 30 0d 29 b8 | 0d 45 51 55 44 20 31 38 |QUD 0.).|.EQUD 18|
|00005f00| 34 34 0d 29 c2 2a 45 51 | 55 44 20 25 31 30 30 30 |44.).*EQ|UD %1000|
|00005f10| 31 31 30 30 30 30 30 30 | 30 30 30 30 30 30 30 30 |11000000|00000000|
|00005f20| 31 30 30 30 30 30 30 31 | 30 30 31 30 0d 29 cc 12 |10000001|0010.)..|
|00005f30| 45 51 55 44 20 26 30 31 | 30 30 30 32 46 46 0d 29 |EQUD &01|0002FF.)|
|00005f40| d6 12 45 51 55 44 20 26 | 30 30 30 43 30 31 30 33 |..EQUD &|000C0103|
|00005f50| 0d 29 e0 0a 45 51 55 44 | 20 30 0d 29 ea 0c 45 51 |.)..EQUD| 0.)..EQ|
|00005f60| 55 44 20 2d 39 32 0d 29 | f4 0b 45 51 55 44 20 39 |UD -92.)|..EQUD 9|
|00005f70| 32 0d 29 fe 0a 45 51 55 | 44 20 30 0d 2a 08 2a 45 |2.)..EQU|D 0.*.*E|
|00005f80| 51 55 44 20 25 30 30 30 | 30 30 30 30 30 30 30 30 |QUD %000|00000000|
|00005f90| 30 30 30 30 30 30 30 30 | 30 30 30 30 30 30 30 30 |00000000|00000000|
|00005fa0| 31 31 30 30 31 0d 2a 12 | 2a 45 51 55 44 20 25 30 |11001.*.|*EQUD %0|
|00005fb0| 30 30 30 30 30 30 30 30 | 30 30 30 30 30 30 30 30 |00000000|00000000|
|00005fc0| 30 30 30 30 30 30 30 30 | 30 30 30 30 30 30 30 0d |00000000|0000000.|
|00005fd0| 2a 1c 11 45 51 55 44 20 | 53 70 72 69 74 65 73 25 |*..EQUD |Sprites%|
|00005fe0| 0d 2a 26 12 45 51 55 44 | 20 26 30 30 30 30 30 30 |.*&.EQUD| &000000|
|00005ff0| 30 30 0d 2a 30 1d 45 51 | 55 53 20 22 22 2b bd 31 |00.*0.EQ|US ""+.1|
|00006000| 33 2b 22 20 20 20 20 20 | 20 20 20 20 20 20 22 0d |3+" | ".|
|00006010| 2a 3a 0a 45 51 55 44 20 | 31 0d 2a 44 0a 45 51 55 |*:.EQUD |1.*D.EQU|
|00006020| 44 20 30 0d 2a 4e 0c 45 | 51 55 44 20 2d 39 32 0d |D 0.*N.E|QUD -92.|
|00006030| 2a 58 0b 45 51 55 44 20 | 39 32 0d 2a 62 0a 45 51 |*X.EQUD |92.*b.EQ|
|00006040| 55 44 20 30 0d 2a 6c 2a | 45 51 55 44 20 25 31 31 |UD 0.*l*|EQUD %11|
|00006050| 31 31 30 31 31 31 30 30 | 30 30 30 30 30 30 30 30 |11011100|00000000|
|00006060| 31 31 30 30 30 30 30 30 | 30 31 31 30 31 30 0d 2a |11000000|011010.*|
|00006070| 76 1d 45 51 55 53 20 22 | 62 6f 78 5f 61 64 22 2b |v.EQUS "|box_ad"+|
|00006080| bd 31 33 2b 22 20 20 20 | 20 20 22 0d 2a 80 05 5d |.13+" | ".*..]|
|00006090| 0d 2a 8a 1e 50 25 3d 49 | 44 52 50 54 52 25 3a 4c |.*..P%=I|DRPTR%:L|
|000060a0| 25 3d 49 44 54 25 2b 69 | 64 74 6c 65 6e 25 0d 2a |%=IDT%+i|dtlen%.*|
|000060b0| 94 0d 5b 4f 50 54 20 50 | 41 53 53 0d 2a 9e 09 41 |..[OPT P|ASS.*..A|
|000060c0| 4c 49 47 4e 0d 2a a8 05 | 5d 0d 2a b2 0a ed 20 50 |LIGN.*..|].*... P|
|000060d0| 41 53 53 0d 2a bc 0e 49 | 44 52 50 54 52 25 3d 50 |ASS.*..I|DRPTR%=P|
|000060e0| 25 0d 2a c6 2d c8 99 20 | 22 57 69 6d 70 5f 43 72 |%.*.-.. |"Wimp_Cr|
|000060f0| 65 61 74 65 57 69 6e 64 | 6f 77 22 2c 2c 57 49 4e |eateWind|ow",,WIN|
|00006100| 44 4f 57 25 20 b8 20 64 | 6f 77 6e 5f 68 25 0d 2a |DOW% . d|own_h%.*|
|00006110| d0 05 e1 0d 2a da 04 0d | 2a e4 13 dd 20 f2 73 63 |....*...|*... .sc|
|00006120| 6c 65 66 74 77 69 6e 64 | 6f 77 0d 2a ee 4f 20 20 |leftwind|ow.*.O |
|00006130| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00006140| 20 20 20 20 20 20 20 20 | f4 20 63 72 65 61 74 65 | |. create|
|00006150| 64 20 28 31 35 3a 32 30 | 3a 33 39 20 32 36 2d 4f |d (15:20|:39 26-O|
|00006160| 63 74 2d 31 39 39 32 29 | 20 62 79 20 57 69 6e 64 |ct-1992)| by Wind|
|00006170| 6f 77 45 64 20 31 2e 30 | 38 0d 2a f8 1d ea 20 4e |owEd 1.0|8.*... N|
|00006180| 24 3a 4e 24 3d bd 31 33 | 2b 22 20 20 20 20 20 20 |$:N$=.13|+" |
|00006190| 20 20 20 20 20 22 0d 2b | 02 15 e3 20 50 41 53 53 | ".+|... PASS|
|000061a0| 3d 38 20 b8 20 31 30 20 | 88 20 32 0d 2b 0c 1f 50 |=8 . 10 |. 2.+..P|
|000061b0| 25 3d 57 49 4e 44 4f 57 | 25 3a 4c 25 3d 50 25 2b |%=WINDOW|%:L%=P%+|
|000061c0| 77 69 6e 64 6f 77 6c 65 | 6e 25 0d 2b 16 0d 5b 4f |windowle|n%.+..[O|
|000061d0| 50 54 20 50 41 53 53 0d | 2b 20 11 2e 73 63 6c 65 |PT PASS.|+ ..scle|
|000061e0| 66 74 77 69 6e 64 6f 77 | 0d 2b 2a 43 45 51 55 44 |ftwindow|.+*CEQUD|
|000061f0| 20 38 37 36 3a 45 51 55 | 44 20 37 34 30 3a 45 51 | 876:EQU|D 740:EQ|
|00006200| 55 44 20 39 36 38 3a 45 | 51 55 44 20 38 33 32 3a |UD 968:E|QUD 832:|
|00006210| 45 51 55 44 20 30 3a 45 | 51 55 44 20 30 3a 45 51 |EQUD 0:E|QUD 0:EQ|
|00006220| 55 44 20 32 35 36 32 36 | 33 30 39 0d 2b 34 30 45 |UD 25626|309.+40E|
|00006230| 51 55 44 26 38 43 30 30 | 30 38 31 32 3a 45 51 55 |QUD&8C00|0812:EQU|
|00006240| 44 26 31 30 30 30 32 46 | 46 3a 45 51 55 44 26 43 |D&10002F|F:EQUD&C|
|00006250| 30 31 30 33 3a 45 51 55 | 44 20 30 0d 2b 3e 44 45 |0103:EQU|D 0.+>DE|
|00006260| 51 55 44 20 2d 39 32 3a | 45 51 55 44 20 39 32 3a |QUD -92:|EQUD 92:|
|00006270| 45 51 55 44 20 30 3a 45 | 51 55 44 26 31 39 3a 45 |EQUD 0:E|QUD&19:E|
|00006280| 51 55 44 26 30 3a 45 51 | 55 44 20 53 70 72 69 74 |QUD&0:EQ|UD Sprit|
|00006290| 65 73 25 3a 45 51 55 44 | 26 32 30 30 30 32 30 0d |es%:EQUD|&200020.|
|000062a0| 2b 48 26 45 51 55 53 20 | 22 22 2b bd 31 33 2b 22 |+H&EQUS |""+.13+"|
|000062b0| 20 20 20 20 20 20 20 20 | 20 20 20 22 3a 3a 3a 45 | | ":::E|
|000062c0| 51 55 44 20 31 0d 2b 52 | 36 a4 74 28 30 2c 2d 39 |QUD 1.+R|6.t(0,-9|
|000062d0| 32 2c 39 32 2c 30 2c 26 | 46 37 30 30 33 30 31 41 |2,92,0,&|F700301A|
|000062e0| 29 3a 45 51 55 53 20 22 | 62 6f 78 5f 61 6c 22 2b |):EQUS "|box_al"+|
|000062f0| bd 31 33 2b 22 20 20 20 | 20 20 22 0d 2b 5c 05 5d |.13+" | ".+\.]|
|00006300| 0d 2b 66 1e 50 25 3d 49 | 44 52 50 54 52 25 3a 4c |.+f.P%=I|DRPTR%:L|
|00006310| 25 3d 49 44 54 25 2b 69 | 64 74 6c 65 6e 25 0d 2b |%=IDT%+i|dtlen%.+|
|00006320| 70 0d 5b 4f 50 54 20 50 | 41 53 53 0d 2b 7a 09 41 |p.[OPT P|ASS.+z.A|
|00006330| 4c 49 47 4e 0d 2b 84 05 | 5d 0d 2b 8e 0a ed 20 50 |LIGN.+..|].+... P|
|00006340| 41 53 53 0d 2b 98 0e 49 | 44 52 50 54 52 25 3d 50 |ASS.+..I|DRPTR%=P|
|00006350| 25 0d 2b a2 2f c8 99 20 | 22 57 69 6d 70 5f 43 72 |%.+./.. |"Wimp_Cr|
|00006360| 65 61 74 65 57 69 6e 64 | 6f 77 22 2c 2c 57 49 4e |eateWind|ow",,WIN|
|00006370| 44 4f 57 25 20 b8 20 73 | 63 6c 65 66 74 5f 68 25 |DOW% . s|cleft_h%|
|00006380| 0d 2b ac 05 e1 0d 2b b6 | 04 0d 2b c0 04 0d 2b ca |.+....+.|..+...+.|
|00006390| 13 dd 20 f2 64 65 66 61 | 70 70 77 69 6e 64 6f 77 |.. .defa|ppwindow|
|000063a0| 0d 2b d4 4f 20 20 20 20 | 20 20 20 20 20 20 20 20 |.+.O | |
|000063b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 f4 20 | | . |
|000063c0| 63 72 65 61 74 65 64 20 | 28 31 35 3a 35 37 3a 32 |created |(15:57:2|
|000063d0| 32 20 32 36 2d 4f 63 74 | 2d 31 39 39 32 29 20 62 |2 26-Oct|-1992) b|
|000063e0| 79 20 57 69 6e 64 6f 77 | 45 64 20 31 2e 30 38 0d |y Window|Ed 1.08.|
|000063f0| 2b de 1d ea 20 4e 24 3a | 4e 24 3d bd 31 33 2b 22 |+... N$:|N$=.13+"|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.